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Введение 


Общие положения 


Решение задачи на ЭВМ с составлением программы состо- 
ит из четъгрех зтапов: 


Постановка задачи. 
Составление алгоритма. 
Составление программы. 
Ввод и отладка программы. 


PEMS 


То есть, прежде чем приступать K непосредственному CO- 
ставлению программы или написанию последовательности 
операторов языка, необходимо отчетливо представить себе ход 
процесса вычислений, ту последовательность действий, кото- 
рую должна реализовать программа. Первый этап не поддает- 
ся строгой формализации и может быть достаточно сложным 
для больших задач, но в лабораторных работах постановка за- 
дачи приводится в самом задании. 

Строгое представление последовательности действий, то 
есть алгоритм, наиболее удобно изображать графически с по- 
мощью блок-схем или граф-схем, хотя его можно представлять 
и другими способами, например словесно. На этапе обучения 
программированию использование детализированных блок- 
схем является обязательным. 

Составление программы выполняется на каком-либо языке 
программирования. В данном курсе используется язык высо- 
кого уровня Паскаль. При составлении программы необходимо 
строго придерживаться правил записи программы, которые 
изложены в литературе, например, приведенной в списке в 
конце методических указаний. 

Для ввода и отладки программы используется система 
программирования Турбо Паскаль, или Free Pascal, или Pascal 
АВС: краткие сведения о первой из них приводятся далее. 
Этот этап включает и тестирование программы, то есть про- 
верку ее работоспособности при самых разнообразных услови- 
ях эксплуатации и вводимых данных. 

При профессиональном программировании существует и 
пятый этап - сопровождение программы. Он заключается в 
исправлении замеченных в ходе работы с программой ошибок 
и изменениях по улучшению эксплуатационных свойств про- 
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граммы. Для больших программных комплексов (например, 
операционных систем) это один из самых трудоемких этапов, 
наряду с тестированием программы. 


Основные сведения об алгоритмах 


Алгоритм — это формальное предписание, однозначно 
определяющее содержание и последовательность операций, 
переводящих совокупность исходных данных в искомый ре- 
зультат - решение задачи. 

Иначе говоря, алгоритм - это набор понятных исполните- 
лю инструкций (команд), точное выполнение которых приво- 
дит к достижению требуемого результата. 

Алгоритмы имеют определенную форму записи. При со- 
ставлении сложных алгоритмов, которые используются в про- 
граммировании, чаще всего используется графическая форма 
записи. На неё введены соответствующие стандарты: «ГОСТ 
19.003-80. Схемы алгоритмов и программ. Обозначения 
условные графические» и «ГОСТ 19.701-90. Схемы алгоритмов, 
программ, данных и систем. Условные обозначения и правила 
выполнения». 

Линии, указывающие последовательность перехода от бло- 
ка к блоку, называемые линиями потока, и линии контуров 
блоков должны иметь одинаковую толщину. Основное направ- 
ление потока информации идет сверху вниз и слева направо, 
здесь стрелки на линиях можно не указывать. В остальных 
случаях наличие стрелок обязательно. Отношение ширины и 
высоты блока строго регламентировано и обычно составляет 3 
к 2 (b ка если не указано отдельно, т.к. некоторые блоки 
имеют половинную высоту). 

Приведем самые основные блоки, которые будут использо- 
ваться в лабораторных работах. 

1. Вычислительный блок, Процесс, изображаемый прямо- 
угольником с входящей и исходящей стрелками (рис.1). В 
блоке указывается (с различной степенью детализации) по- 
следовательность реализуемых действий. 
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Рис. 1. Блок Процесс. 


2. Блоки ввода и вывода информации, Ввод-вывод, изобра- 
жаются параллелограммом с входящей и исходящей стрел- 
ками. Это относится к любым носителям информации 
(рис.2). В блоке указываются вводимые или выводимые 
данные. 


0,25а 


Рис. 2. Блок Ввод-вывод. 


3. Блок начала программы, Пуск, представляет собой овал с 
выходящей из него линией. В овале может быть приведена 
вспомогательная или поясняющая информация. Аналогично 
блок окончания программы, Останов, иначе называемый 
Терминатор (рис.3). 


R 2=0,25а 





Рис. З. Блок Пуск-останов. 


4. Логический блок, Решение, изображаемый в виде ромба с 
одной входящей и двумя или несколькими выходящими 
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стрелками (рис.4). Внутри ромба помещается текст логиче- 
ского вопроса, допускающего или двоичный ответ (да/нет), 
или несколько вариантов выбора. В любом случае над 
стрелками пишутся условия прохождения по этой ветви. 


ra 


Рис. 4. Блок Решение. 


5. Специально для отображения циклических структур введен 
блок заголовка цикла, Модификация, после которого идут 
блоки внутрицикловых операций (рис.5). С последнего блока 
линия потока должна возвращаться на заголовок цикла. 
Вторая линия из блока выходит по условию окончания цик- 
ла. 


/ 


Рис. 5. Блок Модификация. 


6. Для более наглядного представления можно использовать 
блок, состоящий из двух фигур, который аналогичен блоку 
Модификация, Гранииа иикла (рис.6) 
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Рис. 6. Блок Граница цикла. 


7. Если модуль или подпрограмма составлены и описаны от- 
дельно, то используется блок Предопределенный процесс 
(рис.7). В нем указывается название подпрограммы или 
программного модуля. 





Рис. 7. Блок Предопределенный процесс. 


8. Для пояснения отдельных блоков, их групп и линий потока 
используются комментарии (рис.8). Они записываются 
справа от блоков и соединяются с ними пунктирной лини- 
ей. В комментариях может находиться любая поясняющая 
информация. 
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Брит? 


Рис. 8. Комментарии. 


8. При большом количестве блоков или линий связи линии 
потока можно прерывать, используя Соединители (рис.9), 
изображаемые в виде круга. Внутри круга ставятся цифры 
или комбинации букв и цифр, но одинаковые в начале и в 
конце обрыва линии потока. 


Ø 0,5а 


Рис. 9. Соединители. 


Исполъзование зтих блоков позволяет наглядно предста- 
вить алгоритм вычислений. Всего же ГОСТы устанавливают 
для изображения схем алгоритмов и программ 42 символа. Из 
них 30 - обязательных, а 12 - рекомендуемых. 

Примеры блок-схем приводятся в некоторых заданиях. 

После того, как составлена блок-схема алгоритма, можно 
писать программу на любом языке программирования, подхо- 
дящем для данной области. Для научно-технических задач это 
такие языки, как Паскаль, Си++, Си#, Бейсик, РНР и другие. В 
данном курсе используется язык программирования Паскаль 
для ІВМ-совместимых компьютеров (точнее, его объектно- 
ориентированная реализация Object Pascal). 
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Язык Паскаль и интегрированные 
среды разработки программ 


Хотя язык Паскаль является относительно старым языком 
программирования, созданным Никлаусом Виртом в 1968-69 
годах специально для обучения студентов программированию, 
но с появлением персональных компьютеров он получил ши- 
рокое распространение не только в образовательной сфере, но 
и при решении различных прикладных задач. 

В 1986 году фирма Apple разработала объектное расшире- 
ние языка Паскаль, получив в результате Object Pascal. Он был 
разработан группой Ларри Теслера, который консультировался 
с Никлаусом Виртом. 


Турбо-Паскаль 


В 1983 году появилась первая реализация инструменталь- 
ной среды Турбо Паскаль, предназначенная для IBM- 
совместимых компьютеров. Она включала в себя оболочку 
(интерфейс, с помощью которого происходило общение чело- 
века с компьютером: набор и запуск программ, считывание 
резульгатов и т.д.), текстовый редактор, транслятор и отлад- 
чик. С тех пор система программирования Турбо Паскаль 
непрерывно совершенствовалась фирмой Borland 
International. Появилась развитая система подсказки, система 
сборки всей программы из отдельных модулей (линковщик), 
богатые библиотеки подпрограмм и многое другое. Комплекс 
программных средств, используемый программистами для 
разработки программного обеспечения, стали называть инте- 
грированнои инструментальной средой разработки про- 
грамм (Integrated Development Environment, ШЕ, иногда 
именуемая ИСР), или просто средой программирования. 

В 1992 году была представлена ИСР уже с использованием 
языка Object Pascal - Турбо-Паскаль 7.0. На этом развитие 
Турбо Паскаля закончилось. Окно ИСР Турбо-Паскаль пред- 
ставлено на рис.10. 
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сх Turbo Pascal 
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Fi Help | Create а new file in a new Edit window 


Рис. 10. Создание нового окна программьг B Турбо- 
Паскале 


Егее Разса! 


Свободно распространяемые компиляторы системы про- 
граммирования Егее Разса! реализованы во многих дистрибу- 
тивах Linux, есть свободные компиляторы и для ОС Windows 
ХР/7/10. На основе Егее Разса| создана свободная мульти- 
платформенная среда Lazarus, аналогичная среде Delphi. Free 
Разса! внешне очень похож на Турбо Паскаль, хотя и является 
мульгиплатформенным. 

Начальная заставка этой ИСР приведена на рис.11. 

Так как Егее Разса| - свободно распространяемое ПО, то 
его можно скачать с сайта http://freepascal.org/ и бесплатно 
установить. На этом же сайте и находится вся документация 
по Егее Разса!. 
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Рис. 11. Начальная заставка Free Pascal. 


Pascal АВС.МЕТ 


Эта ИСР наиболее приближена к профессиональной си- 
стеме Delphi, то есть разработана без оглядки на старую ОС 
MS DOS. Как следствие, здесь присутствует панель инстру- 
ментов, закладки для оперативного переключения между про- 
граммами, 2 окна: ввода и вывода результатов. Учебная си- 
стема программирования Pascal АВС.МЕТ (автор - С.С. Muxas- 
кович) представляет собой диалект стандартного языка Пас- 
каль. Она призвана осуществить постепенный переход от про- 
стейших программ к объектно-ориентированному программи- 
рованию сложных программных продуктов уже на базе Delphi. 

Начало работы в этой ИСР представлено на рис.12. 

Хотя и считается, что интегрированная среда разработки 
Pascal АВС.МЕТ полностью совместима с языком программи- 
рования Object Pascal, но это не так. В Pascal АВС.МЕТ доста- 
точно много изменений, указанных в приложении Б, взятых 
из языков Basic, С, а главное, с платформы .МЕТ. Поэтому, xo- 
тя поначалу кажется, что язык, используемый в Разса! 
АВС.МЕТ, такой же, что и Object Pascal, но это не так. 

Конечно, в некоторых случаях проще написать короткую 
(учебную) программу в среде Pascal АВС.МЕТ, но все-таки 
лучше использовать стандартный язык программирования. 

В любом случае это так же свободно распространяемое 
ПО, находящееся на сайте http://pascalabc.net/. 
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Рис. 12. Начало работы в Разса! АВС. 
Delphi 


Delphi является профессиональной средой программиро- 
вания, хотя в его основе лежит всё тот же язык программиро- 
вания Object Pascal. ИСР Delphi прошла долгий путь развития, 
начиная с Borland Delphi (1995 г.) для ОС Windows 3.1, затем 
для Windows 95 (еще 16-разрядных). Существовали версии 
Delphi с 2.0 до 8.0 (1996-2003 годы), Delphi 2005-2010 с соот- 
ветствующими годами выпуска. Начиная с 2010 года стала 
выпускаются MCP Delphi ХЕ, затем Delphi ХЕ (2011 год) и так 
далее. 


Во введении будет кратко рассмотрена работа со средой 
Егее Разса1. Работа с остальными ИСР очень похожа. 


После того, как программа составлена, ее необходимо вве- 
сти в компьютер. Здесь мы и сталкиваемся с инструменталь- 
ными пакетами программ Free Pascal или Pascal АВС. Free 
Pascal пакет содержит не только транслятор с языка Object 
Pascal, но и редактор текста, инструментальную оболочку, OT- 
ладчик, описание ИСР, обширные библиотеки программ и 
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многое другое, например, программы примеров объектно- 
ориентированного программирования. 

Для связи основных из этих программ в единое целое, со- 
здания удобного и наглядного интерфейса и предназначена 
интегрированная инструментальная среда разработки 
программ, кратко ИСР. 

Вызов ИСР осуществляется посредством запуска либо с 
рабочего стола, либо с помощью кнопки меню «Пуск» файла 
Гр.ехе. После запуска файла їр.ехе появляется основной экран 
MCP, состоящий из трех частей: строки меню, рабочей зоны и 
строки состояния в соответствии с рис.11. 

При начальном запуске ИСР в рабочей зоне открыто одно 
окно с номером 1 в правом верхнем углу и с заголовком 
попате01.раѕ. В дальнейшем, после записи программы на 
диск, стандартный заголовок заменится на имя программы, 
данное ей при записи. Если рабочая зона пустая, то создается 
новое окно командой File > New, как представлено на рис. 13. 





m 
É: Ци: Free Pascal IDE 


Е попамей ра mmm 





ilg | Е 
F1 Help F2 Save ЕЗ Open Я11+Е9 Compile Е9 Маке ВЯ1++Е10 | оса! menu 


Рис. 13. Вид окна ИСР после запуска файла їр.ехе в окон- 
ном режиме 


Мигающий курсор указывает то место на экране, в кото- 
ром будет появляться очередной символ текста. Ввод каждой 
новой строки заканчивается нажатием клавиши Enter. Компи- 
лятор не различает прописные и строчные буквы, поэтому все 
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равно, в каком регистре набираются латинские буквы. Так, 
следующие строки будут эквивалентными: 


Ргодгат А; 
РВОСВАМ а; 
PrOgRaM а; 


Набирая текст, особое внимание необходимо обращать на 
точное воспроизведение всех знаков: точек, точек с запятой, 
апострофов, пробелов, так как компилятор очень чувствителен 
к мелочам подобного рода. 


Строка меню активизируется клавишей F10 (если управ- 
ление осуществляется с клавиатуры) и состоит из 10 пунктов, 
которые, в свою очередь, разворачиваются в спускающиеся 
подменю: 

File - позволяет выполнять все основные операции с файла- 
ми: создавать новые, загружать имеющиеся, сохранять со- 
зданные и отредактированные файлы, выводить на прин- 
тер содержимое этих файлов, заканчивать сеанс с ИСР и 
так далее. 

Edit — дает возможность выполнять основные операции pe- 
дактирования текста. 

Search — позволяет осуществлять поиск фрагментов текста и 
при необходимости производить замену найденного фраг- 
мента новым. 

Кип — позволяет запускать программу, находящуюся в рабо- 
чей зоне, а так же при необходимости пошагово выпол- 
нять данную программу или ее часть. Если были внесены 
изменения в программу, то при запуске она автоматиче- 
ски заново компилируется. 

Compile - возможно осуществить компиляцию программы, 
которая находится в рабочей зоне, без ее выполнения, 
чтобы проверить на наличие ошибок. 

Debug — содержит команды, облегчающие процесс поиска 
ошибок в программе: расстановка точек остановки, визу- 
ализация окна отладки, окна регистров, окна выходных 
резульгатов и так далее. 

Tools - дает возможность выполнять некоторые программы, 
не выходя из ИСР. 
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Options — здесь находятся команды, позволяющие устано- 
вить необходимые для работы параметры компилятора и 
ИСР. 

Window — позволяет выполнять все основные операции с oK- 
нами (хотя их гораздо удобнее выполнять с помощью мы- 
ши): открывать, закрывать, перемещать, изменять размер. 

Help – позволяет получить имеющуюся в системе справоч- 
ную информацию. 


Система меню позволяет выполнять практически все ко- 
манды ИСР и интегрированных программ, и выполнена в со- 
ответствии со стандартом SAA (Turbo Vision). 

Строка состояния, находящаяся в нижней части экрана, в 
режиме редактирования демонстрирует некоторые из часто 
используемых операций ИСР и комбинации клавиш для их 
быстрого вызова, которые позволяют выполнить соответству- 
ющие операции, минуя стандартную процедуру их вызова че- 
рез меню. В некоторых режимах здесь выводятся подсказки 
или другая справочная информация. 

Предусмотрены в этой среде и всплывающие подсказки, 
например, на рис.14 (в рамке серого (зеленого) цвета подсказ- 
ка служебного слова Program). 


r | = F 


З Free Pascal IDE 





File Edit Debug Tools 0 Window Help 


попамей] .раѕ 


Search Run Compile tions 





ORRA ARERR ERRER N N N N N N 





Рис. 14. Всплывающие подсказки B Free Pascal. 
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Отладка и выполнение программы 


После того, как программа набрана и поставлена заключи- 
тельная точка после слова end, ее необходимо оттранслиро- 
вать, устранить ошибки, как синтаксические, так и семанти- 
ческие, и выполнить, то есть получить конечный результат. 

После набора программы ее рекомендуется записать на 
диск. Более того, если текст программы достаточно объемен, 
лучше всего делать и промежуточные записи во избежание по- 
тери информации при сбоях компьютера или пропадании 
напряжения питания. 

Если программа набирается заново, то есть активное окно 
имеет имя попате01.раѕ, то при нажатии клавиши F2 выпол- 
нится команда ЕЧе/ Save аз... При этом появится диалоговое 
окно со списком файлов – программ из текущего раздела, с 
именами Files, как на рис.15. 


RA Free Pascal IDE | canale) è=] 


File Edit Search Run Compile Debug Tools Options Window Help 
m попамей] .раѕ 








Нел еп c=’ iles 


lab13.pas 


бро 
F1 Help ЕЗ Open 8Я11+Е9 Compile Е9 Маке Alt+F10 Local menu 











Рис. 15. Сохранение программы B Free Pascal. 


B окне Name набирается имя файла, с которъгм он будет 
сохранен на диске. Имя автоматически будет дополнено рас- 
ширением „раз. После записи на диск имя в текущем окне pe- 
дактора сменится на заданное в поле Name. После дальнейше- 
го набора программы или ее корректировки при нажатии кла- 
виши F2 будет выполняться команда File/ Save, и никаких до- 
полнительных запросов происходить не будет. 
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При переходе к новой программе окно с текстом старой 
программы закрывают (<Alt+F3> или Window / Close, хотя это 
и не обязательно) и открывают новое активное окно (File / 
New). При необходимости чтения другой, ранее набранной 
программы, выполняется команда File / Open... (ЕЗ), в появ- 
ляющемся диалоговом окне в области Files перемещением 
маркера выбирается нужный файл и нажимается клавиша Еп- 
(ет, эквивалентная кнопке диалогового окна Open. 

После ввода программы ее можно откомпилировать с це- 
лью устранения ошибок (<Alt+F9>). Если программа не сохра- 
нена, то при компиляции возникнет диалоговое окно как при 
сохранении программы. Если компилятор обнаружил синтак- 
сические ошибки, то появится сообщение, представленное на 
рис.16. 


RA Free Pascal IDE cgr E jès 
: : z = т z 


o 
Priml.pas 
Program Ре1м1; 
Var a,b,c:real; 
Begin 
а: = 
Ь: =а+ехр(й. 1*(<іп(а+ 
с: =ехр( $1 
Нет еп 
end. Hain file: с: \Ррс\2.6.&\Б1п\ргтм1 .раз$ 
Failed То compile... 
Target: НпЗ2 for 1386 


Line number: 0 Total lines: 


6 
Used memory: 221K Allocated memory: 2240K 
Total errors: 2 Compile time: 0.05 


Compile failed 


| ( лат +) --) Ружа м1 | 
ресаизе от (:\Трс\ё.6.&\Б1п\рг1м1.раз$ 








Ргім1.раѕ(0) Fatal: Compilation aborted 











F1 Help ЕЗ Open Alt-F9 Compile F9 Маке Я1++Е10 Local menu 


Рис. 16. Сообщение O наличии в программе синтаксиче- 
ских ошибок. 


После того, как все ошибки устранены, появится следую- 
щее сообщение, как на рис. 17: «Компиляция выполнена: 
нажмите любую клавишу». 
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RA Free Pascal IDE 


File Edit Search Run Compile Debug Tools Options Window Help 

[ : |] = Prim]. раз ~~] 
Program Рат; 

Var а,Ь,с:геа!; 
Begin 


:=а+ехр(0.1*(<іп(а+0.2))): 
с:=ехр(<1 
Writeln{’ 


end. На file: с: \Ғрс\2.6.4\Ь1іп\рг1ім1.раѕ 
опе. 
Target: Н1п32 Гог 1386 


Line number: 8 Total lines: ? 
Used memory: 215K Allocated memory: 1760K 
Total errors: 0 Compile time: 0.05 


Compile successful: Press any Ке 


F1 Help F3 TER В11+Е9 Compile F9 Маке Alt+F10 Local menu 





Рис. 17. Компиляция завершена успешно. 


После ввода всей программъг ее можно либо откомпилиро- 
вать, либо сразу отдать команду на выполнение (<Ctrl+F9>). В 
последнем случае все равно выполнится предварительная 
компиляция, и если присутствуют синтаксические ошибки, 
программа выполняться не будет. Если программа не сохра- 
нена, то при компиляции возникнет диалоговое окно как при 
сохранении программы. 


Все ошибки программ делятся на два больших класса: 
ошибки компиляции (синтаксические) и ошибки выполнения 
(логические или алгоритмические). О первом типе ошибок со- 
общает компилятор до запуска программы на выполнение с 
указанием типа ошибки и предполагаемого ее места. К сожа- 
лению, ошибка может быть и не там, где стоит курсор; его по- 
ложение - это фактически то место, где компилятор «осознает» 
ошибку. Например, если имеется лишний BEGIN в программе, 
то компилятор не поймет этого до тех пор, пока пары BEGIN... 
ЕКО не будут сбалансированы. На начальном этапе програм- 
мирования болыпинство синтаксических ошибок происходит 
из-за невнимательности набора программы. Даже в первой 
строке могут делаться ошибки, см. рис.18. 
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o 
Priml.pas 


Programm Primi; 
Var a,b,c:real; 
Begin 
a:= ; 
b:=a+exp{ 
с:=ехр(51 
Нет етп( Hain file: с: \ЁРрс\2.6.&\Б1п\рг1м1 .ра$ 
end. Failed to compile... 
Target: №1п32 for 1386 
Line number: 0 Total lines: 0 
Used memory: 224K Allocated memory: 2912K 


Total errors: 2 Compile time: 0.05 


Compile failed 
[| = Compiler Меѕѕадеѕ 








Ргім1.раѕ{0) Fatal: Compilation aborted 











Рис. 18. Ошибка B служебном слове 


В первой строке сообщений компилятора появится сооб- 
щение: «Ргіт1.раѕ(1,9) Fatal: Syntax error, “BEGIN” expected but 
“identifier PROGRAMM” found». 

Здесь Priml.pas - имя программы, данное ей при записи 
на диск. 

(1,9) – место, где обнаружена ошибка (строка, столбец). Не 
всегда совпадает с реальным местом ошибки. 

Fatal: Syntax error - синтаксическая ошибка фатальная, 
дальнейшее выполнение невозможно. 

“BEGIN” expected but “identifier PROGRAMM” found - ожи- 
дается BEGIN, но найден идентификатор PROGRAMM. Первое 
обязательное служебное слово - Begin, все остальные: заголо- 
вок, разделы описаний, можно и не писать. Все конструкции 
языка Паскаль, которые состоят из букв и цифр и начинаются 
с буквы, являются идентификаторами, за исключением слу- 
жебных слов и некоторых директив. Так как слово 
PROGRAMM к служебным не относится, то оно определено как 
идентификатор, с которого не должна начинаться программа. 

В данном примере пояснение причины ошибки не имеет 
особого смысла, - ожидается оператор BEGIN, - и такое случа- 
ется довольно часто. Более осмысленное толкование происхо- 
дит в следующем случае: 


Ргодгат Рит 1; 
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2.7 


«Ргит1.раѕ(1,14) Fatal: Syntax error, ”; expected but “ordinal 
const” found» - перед порядковой константой (единицей) ожи- 
дается точка с запятой. 

Смысл ошибки заключается в том, что имя программы, 
как и обычные идентификаторы, не должно включать пробе- 
лы, поэтому за разделителем, - пробелом, должна идти следу- 
ющая конструкция языка, отделяемая от заголовка точкой с 
запятой. 

Довольно часто позиция указывается в строке, следующей 
за ошибочной: 


С:-2.3 
АВС; 


Точка с запятой должна стоять перед А, то есть в конце 
предыдущей строки. 

В любом случае при непонимании ошибки следует обра- 
титься к синтаксису отмеченной конструкции языка Турбо 
Паскаль, либо к предыдущей. 


Ошибки выполнения появляются после компиляции и 
запуска программы на выполнение. На экране программы вы- 
дается сообщение вида, представленного на рис.19. 


Язъгк Паскаль и средьг разработки 23 





# | 
З Free Pascal IDE 2 118) 


File Edit Search Вип Compile Debug Tools Options Window Help 
Се еа Рут рас аи | и | | Дена 
Program Рг1м1: 
Var ј:1піедег; 
s,a,b:real; 


do 
Begin Program c:\fpc\2.6.4\bin\prim2.exe 


: =ехр($1п(]+ exited with 
5:=5+р; ехіісодйе = 201 
:=)+1; 


ИЯ 


Writeln({’c=’,s: 








10:6 = | 
Е1 Help ЕЗ Ореп Alt+F9 Compile F9 Маке В11+Е 10 Local menu 


E И ще а а 


Рис. 19. Сообщение с кодом завершения 201. 


Ошибки выполнения искать труднее, чем синтаксические. 
Это и ошибки на уровне ОС, и ошибки ввода - вывода, и кри- 
тические ошибки, и фатальные ошибки. Но, хотя ошибок дан- 
ного класса довольно много, в данном курсе лабораторных ра- 
бот чаще всего появляются только три фатальные ошибки: 


Exitcode = 200 – Деление на нуль. 

Exitcode = 201 – превышение времени выполнения програм- 
мой. 

Exitcode = 207 - переполнение при операции с плавающей 
точкой. 


Вообще говоря, комментарии к первой и последней ошиб- 
кам не требуют дополнительных пояснений. Хотя они могут 
случаться не только при недопустимых делениях и вышедших 
из под контроля циклах операций умножения, но в данных ла- 
бораторных работах гораздо чаще встречаются при недопу- 
стимых аргументах математических функций: отрицательных 
значениях для логарифмов, квадратных корней, и других. 

Ошибки же по времени выполнения (зацикливания ком- 
пьютера) возникают либо при неверно составленном алгорит- 
ме, а соответственно, и программе, либо при выходе за грани- 
цы неконтролируемых величин. Так как циклы могут исполь- 
зовать 2 типа операторов, то в цикле FOR категорически 
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запрещено принудительное изменение параметра цикла, 
так как он изменяется автоматически. В циклах While и Re- 
реа!, наоборот обязательно надо изменять параметр цик- 
ла принудительно, иначе он останется без изменения. В бес- 
конечных циклах каждое последующее слагаемое должно 
уменьшаться. Пример последней ситуации приведен в при- 
мечании к лабораторной работе № 4. 


MCP Free Pascal имеет два экрана. На основном экране 
набираются, просматриваются и редактируются программы, 
отдаются команды ИСР, устанавливаются параметры работы 
и так далее. Но при запуске программы появляется другой 
экран - экран пользователя. Сюда помещаются результаты ра- 
боты по программе, и он виден до тех пор, пока программа не 
перестанет выполняться. Так как в данном курсе лаборатор- 
ных работ программы весьма просты, то они выполняются 
практически мгновенно, и снова появляется основной экран 
ИСР. Для просмотра экрана пользователя из меню выби- 
рается Debug > User screen или нажимается комбинация 
клавиш <Alt+F5>. Для возврата к основному экрану можно 
нажать любую клавищу. Если в процессе запуска программы 
возникнет необходимость прервать ее работу, например в слу- 
чае «зацикливания» программы, используют комбинацию KAA- 
виш <Ctrl+Break>. 

На экране пользователя мы увидим либо сообщение об 
ошибке выполнения, либо результат (если пропущен оператор 
вывода, естественно, вывода результата не будет), напри- 
мер, как на рис.20. 
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Free Pascal IDE Version 1.0.12 [2014703706] a] 
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GDB Version GDB 7.4 
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Рис. 20. Результат по нажатию клавиш <А1ё+Е5>. 


Здесь нам нужна только последняя строка: 
c= 1.30402 


Результат может быть и неверным как из-за неправильно 
составленного алгоритма, так и из-за ошибок в программе, ко- 
торые формально, с точки зрения транслятора, ошибками не 
являются. Например, при вычислении суммы по следующему 
фрагменту программы 


5:-0; 

For 1:51 to 10 до; 
5:=5+1/1; 

Writeln (5:8:5); 


результат вычислений будет равен 0.10000. Здесь после слу- 
жебного слова ПО стоит пустой оператор, поэтому именно он, 
то есть «ничто» будет выполняться десять раз. Затем к нулю 
прибавится одна десятая. Формально программа составлена 
правильно, и такую конструкцию иногда используют в каче- 
стве задержки по времени, но фактически десять раз должен 
выполняться оператор из третьей строки. 

Конкретные рекомендации в таких случаях являются ин- 
дивидуальными для каждой программы, существуют только 
общие методы тестирования. Рассмотрим два самых простей- 
ших. 

Первый метод самый универсальный и может использо- 
ваться с любыми языками программирования, трансляторами 
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и ассемблерами. Заключается он в выводе промежуточных ре- 
зультатов. Внутрь цикла, или в «подозрительные» места про- 
граммы временно вставляются операторы вывода изменяемых 
переменных. Например, программа (приведен фрагмент) 


Рог 1:=1 1015 до 
Ведт 
о:-9+11; 
i:=i+1 
end; 


просто «зацикливается» (если не используются директивы KOH- 
троля). Но если перед 1:=1+1 поставить оператор 


Writeln (8:8:5,1:8); 


то после запуска программы появятся два столбика бегущих 
чисел. Если приостановить вывод информации на экран мо- 
нитора клавишей Pause, то сразу будет видно, что і изменя- 
ется не с шагом 1, а 2. То есть параметр цикла изменяется и в 
операторе For, и в операторе присваивания. 

Второй метод привлекает средства отладки ИСР. Предва- 
рительно установив программный счетчик на начало про- 
граммы (Кип > Program reset или <Ctrl+F2>), открывается окно 
наблюдаемых переменных (Debug > Ада Watch или <Ctrl+F7>): 
в Watch-okHe набирается имя первой контролируемой mepe- 
менной, нажимается Enter. После этого появляется окно с 
именем Watches и значением этой переменной. Добавление 
переменных в окно выполняется необходимое количество раз. 
Для пооператорного выполнения программы предназначена 
«горячая» клавиша F7 (Кип > Trace тю). После каждого нажа- 
тия клавиши К7 выполняется один оператор. Если он произ- 
водит изменение значения переменной, то это сразу отразится 
в окне наблюдения. 

Таким образом, анализируя изменение значений перемен- 
ных при пооператорном выполнении программы, легко найти 
ошибку в алгоритме, и соответственно в программе. 
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Порядок выполнения лабораторных 
работ 


По каждому заданию составляется алгоритм и программа, ко- 
торые помещаются в отчет. 

Отчет по лабораторной работе оформляется в ученических 
тетрадях 12 листов или на стандартных листах формата А4, кото- 
рые затем скрепляются. 

Отчет должен состоять из титульного листа и описания лабо- 
раторных работ. Каждая работа представляется отдельно в отчете. 

Титульный лист оформляется в соответствии с общими требо- 
ваниями соответствующего факультета по оформлению титульных 
листов лабораторных работ. В любом случае на первом листе (для 
тетради — обложке) должны находиться сведения по названию 
предмета, номеру, названию и варианту лабораторной работы, но- 
меру группы и ФИО учащегося. 

Номер варианта задается преподавателем. Если студент не 
встречался с преподавателем, то номер определяется в соответ- 
ствии с последними двумя цифрами шифра (номера зачетной 
книжки или студенческого билета) по табл. 1. 


Таблица 1. Соответствие шифра (номера 
зачетной книжки] и номера варианта. 


Номер ва- Номер ва- Номер ва- 
2 
3 
4 


7 | 


Каждое задание по лабораторным работам должно быть пред- 
ставлено четырьмя частями, выполненными рукописно или в виде 
распечатки электронного документа (на листах формата А4). При 
этом не допускается распечатывать общие положения из дан- 
ных методических указаний для увеличения объема отчета. 


17,47,17 27,57,87 
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1. Вариант задания. В кратком виде приводится задание на 
выполнение по конкретному варианту для возможности контроля 
работы, не обращаясь к данным указаниям. Например: 


со 


Вычислить ` > при х =4,376 и заданной точности 10-4. 
11 +x 


2. Блок-схема алгоритма. Приводится рисунок с указанием 
фигур блоков с конкретным внутренним содержанием согласно ва- 
рианту задания. Форма и соотношение размеров блоков должны 
соответствовать ГОСТ 19.002-80 [7]. 

3. Текст программы. Размер программы должен быть мини- 
мальным. Не следует использовать различные украшения при вы- 
воде программы: использовать графический режим, модуль СКТ 
для очистки экрана, перемещения курсора, ожидания ввода и дру- 
гие стандартные подпрограммы и модули. Если же в программе 
они присутствуют, то необходимо четко представлять их назначе- 
ние и принципы работы, а так же отразить в алгоритме. 

В задании 2 приводится два варианта текста программы. 

4. Результат вычислений. Обычно это число, которое полу- 
чается после выполнения программы в среде Турбо-Паскаль, Егее 
Pascal или Pascal АВС, хотя это может быть и группа чисел, табли- 
ца, график. Для получения правильного ответа программа долж- 
на быть набрана на персональном компьютере и в ней устранены 
все синтаксические и логические ошибки. 

Именно на этом этапе выполнения работы используется инте- 
грированная среда разработки Турбо-Паскаль, Free Pascal или Pas- 
са! АВС основные приемы работы с Егее Разса! описаны в начале 
методических указаний. 

Этот этап при наличии компьютера выполняются на практи- 
ческих занятиях, в крайнем случае лабораторные работы можно 
выполнять самостоятельно. Тогда можно продемонстрировать уме- 
ние работать в Паскаль-среде, принеся программу в электронном 
виде. 

В любом случае должен быть представлен отчет в бумажной 


форме. 


Программирование формул 29 


Лабораторная работа Мо 1. 
Программирование формул 


Целью работы является освоение программирования алго- 
ритмов с линейной структурой, когда решение задачи являет- 
ся результатом выполнения цепи вычислений, в которой оче- 
редные вычислительные действия используют в качестве ис- 
ходных данных результаты вычислений на предыдущих эта- 
пах. Действия по вычислениям промежуточных и окончатель- 
ных результатов описываются операторами присваивания. 

Необходимо следить, чтобы порядок расположения опера- 
торов присваивания в программе от ее начала к концу соот- 
ветствовал логической последовательности действий при ре- 
шении поставленной задачи. 

При выборе имен переменных и составлении арифметиче- 
ских выражений необходимо правильно устанавливать тип 
используемых величин (целые, вещественные и так далее). При 
использовании в формулах греческого алфавита можно ис- 
пользовать их латинские названия или буквы, сходные по 
начертанию. Например, символ @ можно заменить на Alfa или 
А, о на Omega или W. 

К сожалению, в языке Паскаль имеется ограниченное ко- 
личество математических функций, в ИСР Егее Разса! и Разса! 
АВС количество функций существенно расширено (см. прило- 
жение А). Хотя при необходимости, то есть при отсутствии 
стандартной функции, ее выражают через другие, используя 
функциональные соотношения. Ниже приводятся основные 
математические функции, отсутствующие в языке Паскаль: 
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chx= (не), gomg 14>0|; 


1 log, x 








log, x = [x>0]. 


105 а и 105, а 


Для того чтобы использовать богатые возможности Free 
Pascal в части функций, необходимо к программе подключить 
модуль Маш. То есть в начале раздела описаний надо записать 
строку 

Uses Маш; 


Более того, любую функцию можно вычислить с помощью 
четырех арифметических операций итерационными методами 
или разложением в ряды. 


Требования к лабораторным работам. 

1. Не забывайте, что в языке Паскаль используются только ла- 
тинские буквы: нет ни кириллицы (кроме строк вывода и 
комментариев), ни греческого алфавита. 

2. Не надо дополнительно преобразовывать выражения. То 
есть все вычисления надо выполнять именно по тем форму- 
лам, которые приведены. 

3. Числа должны быть выведены с фиксированной точкой, и 
количеством цифр после точки 3-6, в зависимости от раз- 
мера числа или от заданной точности, с кратким пояснени- 
ем выводимого числа, например: 

c= 1.2345 
Альфа = 0.012345 


Варианты заданий приведены в табл.2. 
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Таблица 2. Вариантът заданий 
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Лабораторная работа № 2. 
Ветвящиеся алгоритмы 


Логические выражения используются не только для реше- 
ния задач булевой алгебры, но и для ветвления программы в 
логических и циклических операторах. Причем последний ва- 
риант использования логических выражений применяется 
наиболее часто. 

Логические выражения состоят из логических констант, 
переменных и отношений, соединенных логическими опера- 
циями. В простейших случаях в операторах используют отно- 
шения: два выражения, соединенных знаком отношения (<, >, 
>=, <=, =, <>), например [> 20. Но иногда возникают условия, 
требующие использования более сложных логических выраже- 
ний. 

Пример. На плоскости задана фигура (рис.21): усеченный 
круг. Вводится точка с координатами X,Y. Определить, при- 
надлежит введенная точка фигуре или нет. В результате вы- 
водится: «Введенная точка принадлежит фигуре» или «Введен- 
ная точка фигуре не принадлежит». 














2346567 вх 
Рис. 21. Пример фигуры. 


Для определения вхождения точки в круг можно использо- 
вать формулу окружности: 
2 о 2 
(x-xo) (у-у) =R 
Соответственно изменив знак = Ha < (или <= - все равно, 
так как на границах фигуры точки не проверяются) получим 
условие вхождения точки в круг с координатами центра (3,3) 
и радиусом 3: 
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(x-3) + (и-3)? <9 


Кроме этого область, занятая треугольником, так же не 
входит в закрашенную область, то есть полуплоскость над 
прямой У = -Х+7 фигуре не принадлежит. Условия нахождения 
точки внутри круга и под прямой должны выполняться одно- 
временно. Для этого необходимо использовать логическую 
операцию AND. 

Таким образом, логическое выражение 


(x-3) +(Y-3) <9 AND Y<-X+7 


примет истинное значение, если точка входит в закрашенную 
область, иначе ложное. Тогда в логическом операторе по пря- 
мой ветви Then выводится «Введенная точка принадлежит 
фигуре», а по ветви Else «Введенная точка фигуре не принад- 
лежит». 

Но можно и поменять ветви местами, тогда при вхожде- 
нии точки в фигуру логическое выражение должно принимать 
ложное значение. Тривиальный вариант: поставить перед 
предыдущим выражением знак отрицания МОТ. Но более 
наглядным решением будет составление выражения с услови- 
ем невхождения точки в фигуру. Здесь должно выполняться 
хотя бы одно из условий: точка не входит в круг или точка ле- 
жит над прямой, соответственно, логическое выражение при- 
мет вид: 


(Х-3)2+(у-3)2>9 OR У>-Х+7 


При выполнении лабораторной работы составить два ва- 
рианта программы (без использования операции NOT) для фи- 
гуры, соответствующей варианту задания. 

Примечание. При оформлении алгоритма длинные запи- 
си, например формулу логического выражения, можно выно- 
сить в качестве комментария. 


Варианты заданий приведены в табл.З. 
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Таблица 3. Вариантът заданий. 
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Лабораторная работа № 3. 
Циклы с известным числом 
повторений 


Целью работы является освоение программирования алго- 
ритмов с циклической структурой, когда какой-либо участок 
программы выполняется определенное количество раз. 

Типичный пример циклического процесса - вычисление 
конечных сумм. При определении сумм многократно вычисля- 
ется выражение, стоящее под знаком суммы и складывается с 
предыдущей частичной суммой. Вычисления производятся до 
тех пор, пока не будут сложены выражения под знаком суммы 
для всех значений изменяющейся переменной. 

Пример: составить программу, вычисляющую значение 


суммы: 
10; 


ра 


Прежде чем вычислять выражение под знаком суммы и 
очередную частичную сумму, необходимо определить началь- 
ное значение параметра цикла (в данном случае i, которое из- 
меняется от 1 до 10 с шагом 1, то есть будет принимать по- 
следовательно значения 1, 2, 3, 4, ..., 9, 10), и начальную Ya- 
стичную сумму 5. Так как вычисления еще не производились, 
TO = 0. 

Затем вычисляется выражение под знаком суммы для i= 
1, затем 1 = 2, З, ... до 10 и каждый раз складывается с преды- 
дущей частичной суммой 5:1. При этом получается новая Ya- 
стичная сумма Si. После этого 1 увеличивается на единицу и 
проверяется, не стало ли i> 10. Если еще меньше или равно 
10, то вычисляется новая частичная сумма, в противном слу- 
чае вычисление суммы будет закончено, и это значение выво- 
дится на печать. 

Воспользуемся стандартной схемой циклического процес- 
са, представленной на рис.22. 

Блок 1 – блок подготовки к вычислению суммы, в котором 
задаются начальные значения параметра цикла и частич- 
ной суммы. 
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В блоке 2 производится вычисление выражения, стоящего 
под знаком суммы и сложение с предыдущей частичной 
суммой ог. В итоге получается новая частичная сумма Si. 

В блоке 3 происходит изменение параметра цикла (увеличе- 
ние i Ha 1). Это блок подготовки к новому циклу. 

Блок 4 - блок проверки окончания цикла. Необходимо про- 
верить, стало ли больше 10. Если стало, то цикл закончен, 
следующим должен выполняться блок печати. Если нет, то 
вычисление частичной суммы продолжается дальше, то 
есть выполняются блоки 2 и З. 

Проверка может осуществляться условным оператором TF, 
но для организации циклов в языке Паскаль специально 
предусмотрены три оператора цикла. Если количество повто- 
рений заранее известно, и параметр является целым числом, 
то целесообразно использовать оператор FOR, включающий в 
себя блоки 1, 3, 4. В этом случае в алгоритме можно приме- 
нить блок «Модификация». 

Алгоритм для примера с использованием оператора КОК 
приведен на рис.23. 

Варианты заданий - в табл.4. 
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Начало цикла 


Подготовка к циклу 


6 


3 Цикл Да 
закончен? 


Конец цикла 


Внутрицикловые 
операции 


Изменение 
параметра цикла 





Рис. 22. Блок-схема алгоритма циклического процесса 
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Рис. 23. Блок-схема алгоритма примера. 
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Таблица 4. Варианты заданий 


№ Вычислить сумм № Вычислить сумм 
вар. умму вар. yYMMY 
15 | 2 20 


tg Ј 
= tg (0,57+1) 


0,31 
30 e 


11 sin (1+2) 


+5 








20 sin (и- 
У (п-2) 


a (n + 2) 








30 ПА а 





јс] arcsin 1/(7-+1) 








25 
arccos 0,021 
уа 


1 4121-1 
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25 0,5+1:/ 
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Лабораторная работа № 4. 
Циклы с заранее неизвестным 
числом повторений 


Целью работы является освоение программирования алго- 
ритмов с циклической структурой и выхода из цикла по усло- 
вию, не зависящему от количества циклов. Примером такой 
задачи является вычисление суммы с бесконечным верхним 
пределом. 

Проверка цикла осуществляется следующим образом. Так 
как выражение под знаком суммы постепенно убывает с 
ростом слагаемых в сумме (условие сходимости), то наступает 
момент, когда очередное слагаемое станет меньше наперед за- 
данного числа = (грубо говоря, точности вычисления сумм), и 
остальные слагаемые будут мало влиять на конечный резуль- 
тат. Поэтому, когда выражение под знаком суммы | f(d) | бу- 
дет меньше &, то вычисления прекращаются и предполагается, 
что сумма найдена с заданной точностью. 

Так как количество слагаемых заранее неизвестно, то цик- 
лом FOR пользоваться нельзя. Для этих целей предназначают- 
ся циклические операторы WHILE и REPEAT. Необходимо 
помнить, что у этих операторов параметр цикла автоматиче- 
ски не изменяется, и его надо менять принудительно. Поэтому 
при составлении блок-схемы алгоритма блок «Модификация» 
не используется. 

При вычислении суммы должен вычисляться факториал 
по формуле: 


J 
= Пт 
т=1 


Где П - знак произведения (аналогично знаку суммы), то 
есть 5! = 1. 2. 3. 4. 5 = 120. Факториал можно вычислить от- 
дельным циклом, а можно и в цикле вычисления суммы. Для 
этого вводится дополнительная переменная, например | = ;!,и 
затем в цикле умножается на текущее значение J. 

Кроме значения суммы на печать полезно вывести значе- 
ние счетчика циклов, то есть узнать, из скольких слагаемых 
состоит сумма. 

Примечание. 
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1. 
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В языке Турбо Паскаль под переменные типа INTEGER вы- 
деляется два байта, и допустимые для них значения нахо- 
дятся в диапазоне только от -32768 до 32767. Поэтому 
число 10!, реально равное 3628800, в этом случае будет 
представлено как 24320. Таким образом, выражение под 
знаком суммы может никогда и не стать меньше заданной 
точности. Для работы с большими целыми числами реко- 
мендуется использовать вещественный тип ККАГ с диапа- 
зоном представления от 2.9. 10-39 до 1.7. 1038, или, в край- 
нем случае, целый тип Longlnt с диапазоном от - 
2.147.483.648 до 2.147.483.647. 


. Значение с должно быть задано числом в зкспоненциаль- 


ной форме (в форме с плавающей точкой). Не допускается 
задавать его выражением. 


. Вывод суммы должен соответствовать заданной точности. 


Нет смысла выводить десять знаков после точки, если рас- 
четы производятся с тремя знаками после точки. И наобо- 
рот - зачет считать с точностью 3 знака, если выводится 
только 1. 


Варианты заданий приведены в табл.5. 
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Таблица 5. Варианты заданий 


Точность вы- 
№ вар. Вычислить При х, равном ее 
0,149 102 








50 Лабораторная работа № 4 


Точность вы- 
№ вар. Вычислить При x, равном е 
числений 
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Лабораторная работа № 5. 
Средства вывода. Таблицы 


При выводе больших объемов информации для удобства 
чтения ее необходимо оформлять в виде таблиц или графиков. 
Целью работы является изучение операторов ввода-вывода, 
вывод чисел в заданном виде и с определенной точностью, 
вывод последовательности чисел, оформленных в виде таблиц. 

Таблица состоит из заголовка, в котором указано, что, в 
каком столбце расположено, и непосредственно таблицы набо- 
ра значений выводимых переменных. При выводе заголовка 
таблицы используется текстовая информация. Поэтому, чтобы 
правильно напечаталась таблица, необходимо сделать ее ма- 
кет. 

Макет таблицы рисуется на бумаге в клетку, и каждая 
клетка принимается за одну позицию. При этом учитывается, 
где расположена таблица, то есть, сколько позиций надо от- 
ступить от левого края листа, каким образом проводятся вер- 
тикальные и горизонтальные линии (обычно вертикальные - 
набор знаков І или !, горизонтальные - знаки минус или под- 
черкивание). Определяется ширина таблицы, которая зависит 
от количества выводимых значений и точности, с какой эти 
значения выводятся (длина числа зависит от количества цифр 
в числе). После этого, символ за символом, в операторы выво- 
да заносится с макета информация о том, как должен выгля- 
деть заголовок таблицы. 

Далее следует обычный циклический процесс с выводом в 
каждом цикле строки таблицы с рассчитанными значениями 
величин. Здесь оператор вывода наряду с текстовой инфор- 
мацией (вертикальная черта и пробелы), будет содержать и 
числовые значения. 

После вывода таблицы ее необходимо подчеркнуть, то есть 
вывести заключительную горизонтальную линию, состоящую, 
например, из набора знаков минус. 

Все кодовые таблицы символов имеют и символы псевдо- 
графики. Это такие символы, как вертикальная черта, прямой 
угол, перекрестье и т.д., например: | +, || ; Ta 1. Если знать 
сочетания клавиш для символов псевдографики, то изображе- 
ние таблиц получается лучше. Но это требуется не всегда, 
например, для данной лабораторной работы достаточно зна- 
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ков, таких, как латинское «І» большое или восклицательный 
знак «!», и тире «> или символ подчеркивания «_». 


Пример. Вывести таблицу значений функции „|х с точно- 


стью 7 знаков после запятой, причем х изменяется от 2 до Эс 
шагом 1. 

Блок-схема алгоритма представлена на рис. 26, получен- 
ный результат на рис. 24, вариант результата - на рис. 25. 


В 63А 
те З20509 
22 000000:0 
222300678 
24494896 
ОА НИЙ 
202 ОДА 
320000000 


Рис. 24. Распечатка результата счета по программе для 
вывода таблиц. 
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Рис. 25. Вывод таблиц с использованием символов псев- 
дографики. 


Варианты заданий приведены в табл.6. 
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Рис. 26. Блок-схема алгоритма для примера. 
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Таблица 6. Варианты заданий 


Началь- | Конечное | Шаг из- 
№ вар. Функции ное зна- | значение | менения 
чение х 


" x u ^/ 


вата ре кк 


11 0,1 2 
1 


T ух 
р cosx? sinx? oos | a | oos 
eee era е 


108° u 10°" 
+)? и (х+л 


Inyx+m u Іо х+л 





Лабораторная работа Ко 5 


Началь- | Конечное | Шаг из- 
Функции ное зна- | значение | менения 
чение х 
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Лабораторная работа № 6. 
Двойные и кратные циклы 


Целью работы является освоение программирования алго- 
ритмов с двумя вложенными циклами. Примером такой зада- 
чи является вычисление двойной суммы. 

Пример: вычислить с точностью до 0.001. 

7 17 
р | 
Jek 





10 
2 
[=] 


ГМ 


Здесь внешней суммой является сумма по 1, а внутренней 
– сумма по j. Можно рассматривать вычисление этих сумм OT- 
дельно, учитывая, что вычисление внутренней суммы является 
частью вычисления внешней суммы, то есть телом внешнего 
цикла. То есть цикл по :- внешний, по j - внутренний, нахо- 
дящийся целиком внутри текущего вычисления очередного 
слагаемого по 1. 


Варианты заданий приведены в табл. 7. 
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Таблица 7. Варианты заданий 


Точность вы- 
№ вар. Вычислить ` 
числений E 








10 T 
У сов 27 У 1 
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Точность вы- 
№ вар. Вычислить 
числений € 
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Лабораторная работа № 7. 
Сортировка массивов 


Массивы, - упорядоченные по индексу элементы одинако- 
вого типа, — широко используются при составлении программ. 
Над элементами массивов можно производить различные опе- 
рации, например сортировку. 

Сортировка - перестановка объектов данного множества, 
в частности элементов массива, в определенном порядке. Цель 
сортировки - облегчить последующий поиск элементов в от- 
сортированном множестве. Она может достигаться с помощью 
различных алгоритмов, причем каждый из них имеет свои 
преимущества и недостатки. 

Методы сортировки можно разделить на две различные 
категории: сортировка массивов (или элементов с прямым до- 
ступом) и сортировка файлов (с последовательным доступом). 

Основное требование к методам сортировки массивов - 
экономное использование памяти, поэтому здесь не рассмат- 
риваются методы, пересылающие элементы из одного массива 
в другой, вспомогательный. 

Рассмотрим наиболее часто используемые простые методы 
сортировки массивов на примерах сортировки по возраста- 
нию. 


Сортировка простыми включениями 


В этом методе элементы массива условно разделяются на 
готовую последовательность а, ..., С: и входную последова- 
тельность а1, ..., ап. На каждом шаге, начиная с i= 2 и увели- 
чивая i на единицу, берется Ей элемент х= а; входной после- 
довательности и вставляется в готовую последовательность 
после элемента, меньшего, чем х. 

При поиске подходящего места чередуют сравнения и пе- 
ресылки, то есть как бы «просеивают» х, сравнивая его с оче- 
редным элементом а; и либо вставляя х, либо пересылая а) 
направо и передвигаясь налево. «Просеивание» может закон- 
читься при двух различных условиях: 

1. Найден элемент о; меньше, чем х. 

2. Достигнут левый конец готовой последовательности. 

Для проверки окончания «просеивания» можно воспользо- 
ваться либо двойной проверкой с объединением логической 
операцией, либо приемом фиктивного элемента, - «барьера». В 
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этом случае устанавливают «невидимый барьер» ao= x с pac- 

ширением диапазона индексов в описании а до 0..п. При этом 

убирается она проверка, но добавляется одно присваивание. 
Вариант сортировки по возрастанию приведен на рис.27. 


Готовая последовательность Входная последовательность 


————— х 


44 12 42 94 18 06 67 


12 42 44 55 18 06 67 


12 42 44 55 94 06 67 


Барьер м АЕ ЕА са 
12 18 42 44 55 94 67 


06 12 18 42 44 25 94 


06 12 18 42 44 55 67 94 
Рис. 27. Пример сортировки простыми включениями. 


Сортировка бинарными включениями 


Если предположить, что все перестановки п элементов го- 
товой последовательности равновероятны, то алгоритм сорти- 
ровки простыми включениями можно улучшить, ускорив по- 
иск места включения. Для этого готовая последовательность 
разбивается пополам и текущий элемент сравнивается со сто- 
ящим в центре готовой последовательности элементом. Затем 
левый или правый интервал разбивается еще пополам, и так 
далее до тех пор, пока он не станет равным единице. 

Хотя число сравнений и уменьшится, но количество пере- 
становок и их порядок по сравнению с рис.8.1 не изменятся. 


Сортировка простым выбором 
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Постоянный сдвиг большой последовательности элементов 
на одну позицию занимает достаточно много времени. Поэто- 
му лучших результатов можно ожидать от метода, при кото- 
ром меняются местами только два числа. На этом принципе и 
построен алгоритм сортировки простым выбором: 


1. Выбирается наименьший элемент; 
2. Он меняется местами с первым элементом; 
3. Меняется на наименьший из оставшихся второй, третий и 


так далее, элемент. 


Вариант сортировки приведен для тех же исходных дан- 
ных на рис.28. 


55 12 42 94 18 06 67 
06 12 42 94 18 44 67 
06 12 42 94 18 44 67 
06 12 18 94 55 44 67 
06 12 18 42 55 44 67 
06 12 18 42 44 94 67 
06 12 18 42 44 55 67 


06 12 18 42 44 55 67 94 
Рис. 28. Пример сортировки простым выбором. 


Сортировка методом пузырька 


Метод пузырька основан на сравнении и обмене двух со- 
седних пар элементов, поэтому его иногда еще называют ме- 
тодом простого обмена. Если массив элементов расположить 
вертикально, а значение элемента сопоставить с «весом» пу- 
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зырька в резервуаре с водой, то каждый проход по массиву 
приводит к «всплыванию пузырька» на соответствующий его 
весу уровень, как изображено на рис.29. 


Начальные Номер прохода 
значения 2 3 4 5 6 7 8 
44 06 06 06 06 06 06 06 
55 44 12 12 12 12 12 12 
12 55 44 18 18 18 18 18 
42 12 55 44 42 42 42 42 
94 42 18 55 44 44 44 44 
18 94 42 42 55 55 55 55 
06 18 94 ВЫ 67 67 67 67 67 
67 67 67 94 94 94 94 94 


Рис. 29. Пример сортировки методом пузырька. 


Так как три последних прохода никак не влияют на поря- 
док расположения элементов, то обычно запоминается, прово- 
дился ли на данном проходе какой-либо обмен. Если нет, то 
алгоритм сортировки заканчивается. Это относится и к сле- 


дующему методу. 
Метод шейкер - сортировки 


При использовании метода пузырька возникает асиммет- 
рия, связанная с направлением сортировки. Один неправиль- 
но расположенный «пузырек» в «тяжелом» конце отсортиро- 
ванного массива всплывет на место за один проход, а непра- 
вильно расположенный элемент в «легком» конце будет опус- 
каться на свое место только на один шаг на каждом проходе. 
Для устранения данной асимметрии и используют метод шей- 
кер - сортировки, в котором направление проходов меняется 
на каждом шаге (от англ. shake - трясти) , как изображено на 
рис.30. 


Сортировка массивов 


Начальнье Номер прохода 
значения 2 з 4 
Т у Т у 
44 06 06 06 
55 44 44 12 
12 55 12 1" 44 
42 12 42 18 
94 42 55 42 
18 94 18 55 
06 18 67 67 
67 67 94 94 


Рис. ЗО. Пример шейкер - сортировки. 


06 


12 


18 


42 


44 


55 


67 


94 
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Более сложные типы сортировок массивов элементов в 


данной лабораторной работе не рассматриваются. 


Варианты заданий приведены в табл.8. 
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Составить алгоритм и программу для сортировки масси- 
вов, вводимых с клавиатуры, согласно варианту задания. В 
итоге выводятся исходный и отсортированный массивы. 


Таблица 8. Варианты заданий 


№ Метод сортировки Макси- Направление Тип сорти- 
вар. мальное сортировки руемых эле- 
кол-во ментов 
элементов 


2 Простые включения с по убыванию | веществен- 
барьером ный 
Простой выбор по возрастанию | веществен- 


Бинарные включения по убътванию целъпа 


12 
10 
: 
: 


Шейкер - сортировка по убыванию 


7 Простъте включения с 14 по возрастанию целый 
барьером 


Шейкер - сортировка по возрастанию | литерный 


ЕЕ > 
Е Простъте включения 14 по убыванию | веществен- 
НЫЙ 


Шейкер - сортировка по убыванию | веществен- 
НЫЙ 


Простые включения с 12 по убыванию | веществен- 
барьером ный 
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Метод сортировки Макси- Направление Тип сорти- 
мальное сортировки руемых эле- 
кол-во ментов 
элементов 
по убыванию | веществен- 
НЫЙ 


по убыванию литерный 


по возрастанию целый 


Шейкер - сортировка 


Бинарные включения 
l Простъте включения C 
барьером 
Метод пузырька 


20 Простой выбор 


Простые включения 


Метод пузырька 


по возрастанию | веществен- 


по убыванию целый 


по убыванию | веществен- 
НЫЙ 


по убыванию целый 


Простые включения с 
барьером 


Простые включения 


по убыванию | веществен- 
НЫЙ 


по возрастанию целый 
по убыванию литерный 


по возрастанию БЕТОВЕН 


Шейкер - сортировка 


Метод пузырька 


по возрастанию целый 


по убыванию | веществен- 
ный 


по возрастанию | литерный 


Бинарные включения 


Простые включения с 
барьером 





Ел Шейкер - сортировка ги по возрастанию целый 


z Простой вътбор 
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Лабораторная работа № 8. 
Подпрограммы – функции 


Целью данной работы является ознакомление с использо- 
ванием подпрограмм - функций. 

Часто некоторую последовательность действий требуется 
повторить в нескольких местах программы и с разными зна- 
чениями. Чтобы уменьшить объем программы и время на ее 
набор, можно использовать структуру, присущую всем языкам 
программирования, - подпрограмму. Но свойство подпро- 
грамм сокращать текст не является основополагающим. Они 
являются одним из фундаментальных инструментов, оказы- 
вающих влияние на стиль, качество и надежность разработки 
программных систем. Подпрограммы выступают как средство 
декомпозиции программы на логически связанные, но за- 
мкнутые компоненты, что позволяет вести ее разработку це- 
лому коллективу программистов. Так как декомпозиция суще- 
ственно повышает читаемость программы, то подпрограммы, 
как автономные модули, используют даже тогда, когда они 
вызываются однократно. 

В подпрограммах могут вычисляться несколько значений, 
например преобразование матрицы, тогда это будут подпро- 
граммы - процедуры. Если же в подпрограмме вычисляется 
единственное значение, то используются подпрограммы - 
функции. Как следствие, работа с функциями и процедурами 
в языке Паскаль различна: 

1. Кроме различных служебных слов в заголовке при описании 
функции, здесь должен быть определен тип функции, то 
есть возвращаемый параметр является не аргументом, а 
значением самой функции. 

2. При описании функции должно быть хотя бы одно присва- 
ивание значения имени функции, иначе оно будет неопре- 
деленным. 

3. Из основной программы обращение к подпрограмме - 
функции производится так же, как и к стандартным функ- 
циям, то есть указанием в выражении имени и в скобках 
аргументов. 

Например, чтобы вычислить выражение 


п! т! 


=, 
(п+т)! 
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достаточно определить оператор 
S=F(N})*F(M)/F (N+M) , 


при зтом подпрограмму Е можно записать B разделе описания 
функций следующим образом: 


Function Е(К: integer): real; 
Маг Fak:real; 
Begin 
Fak:=1; 
if K>1 then 
for l:=2 to K до 
Fak:=Fak*l; 
F:=Fak 
end; 


В лабораторной работе необходимо определить общую 
формулу для вычисления всех выражений. В программе вы- 
числяются три значения X, У, Z с использованием одной под- 
программы - функции. Ее аргументами будут являться как 
простые переменные, так и массивы: 


{ 0,12; 0,8; 0,2; 0,38; 0,111 
{ 1,5; 0,09; 0,82; 1,13} 

{ 0,85; 1,4; 1,12; 3,24 | 
{ 0O, 
12 


25; 0,21; 0,12; 0,39 | 
Дои В 


боеве 
| 


TTT TT 
wA AAO 


Верхние границы зависят от размера массивов N. 

Использование массивов как параметров функции в дан- 
ной работе обязательно. 

Варианты заданий приведены в табл.9. 
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Таблица 9. Варианты заданий 


№ 
Значение Х Значение У Значение 7, 











тах QD HY... 








TO. 


min (С +Y, 2(C,+Y)} 
„МС +Y) 








max (C= Са) 











Подпрограммъ:- функции мм з č — o o 


Значение X Значение Y Значение 7, 
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№ 
Значение Х Значение У Значение 7, 


























Подпрограммъ:- функции км з č — o o 


Значение X Значение Y Значение 7, 
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Лабораторная работа № 9. 
Подпрограммы - процедуры 


В тех случаях, когда подпрограмма не возвращает никако- 
го конкретного значения, воспользоваться подпрограммой - 
функцией нельзя. Обычно не используют ее и когда несколько 
результатов, например, при преобразованиях массивов. 

При обращении к подпрограмме - процедуре просто ука- 
зывается ее имя со списком фактических параметров. Приме- 
ром стандартных процедур могут быть подпрограммы ввода - 
вывода writeln, геадт и другие. 


Написать программу с использованием подпрограммы- 
процедуры, вычисляющую три вектора или матрицы Х, У, 2, 
являющиеся комбинацией трех векторов по два: 


хмм 
Диема) 
2 мома |. 


если заданы исходные вектора: 


А = 13; 0; -1; 5; 7! 

В = 16; 4.2; 8.8; 5.5} 

С = {-1; 6; -1.8; 6.7) 

р = 40.7; -1.1; 5.1; 6} 
Е = {-0.09; 10; 2.2; 4.5! 
Е = {5.5; 3.1; 2.4; 7}. 


В вариантах приводится одна формула для вычисления 
трех массивов X, Г, Z: 


7 ) 
где соответственно k= 1, 1,2 и [= 2,3, З. 


Например, формула Е (Р,0)- ГРО: с используемыми век- 


торами А, В, С, приводит к трем матрицам (разные индексы 1 
ит): 


Подпрограммы - процедуры 


Х;,ЕА;+ В, 
У; А; +С, 
7, + В+С) 


Во всех вариантах iH j изменяются от 1 до 4. 
Варианты заданий приведены в табл.10. 


75 


76 Лабораторная работа № 9 


Таблица 10. Вариантъг заданий 














| 1 
arcsin + arccos 
Р.+10 











Р, +07+2Р 0, 
4P,Q +! 
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№ Используемые 
А ра 





























mf Рал + Очи 
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Используемые 
вектора 





3ЗР-20Р-1 


i sin Е, COS Q, 




















I 
7 2 
=q 
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Лабораторная работа №10. 
Строки. Перевод чисел из одной 
системы счисления в другую 


Целью работы является освоение программирования алго- 
ритмов с циклической структурой и выхода из цикла по усло- 
вию, не зависящему от количества циклов. 

Формула для перевода из одной системы счисления в дру- 
гую представлена ниже: 


п-1 
Е г—1 7—2 1 0 _ r 
x =а гр Таор teta; P tag р 52a p 
r= 


Здесь х- получившееся число с основанием р. 
а ,- цифры исходного числа. 


Так как преобразования вьшолняются в той системе счис- 
ления, в которую осуществляется перевод, то для перевода в 
систему, отличную от десятичной, используется полином Гор- 
нера: 


X -0(..(а,1-р као): а, з)-.|-р + ад. 


Для обозначения цифр, больших девяти, - в системах 
счисления одиннадцатиричной и более, - используются буквы 
латинского алфавита. Единственной «родной» для компьютера 
системой счисления является шестнадцатеричная. Да и то, что 
количество разрядов в одном байте ровно два. То есть запись 
чисел сокращается ровно в 4 раза. Но бывают самые разнооб- 
разные системы счисления. 

Для их указания используются подстрочные числа, напри- 
мер 


001101012+5310 
АВСО16-4398110+10101011110011010. 


Но в компьютерах в текстах иногда отсутствуют под- 
строчные и надстрочные символы, поэтому для обозначения 
систем счисления используются либо буквы, либо специальные 
символы. Десятичная система счисления обозначается по 
умолчанию, то есть никак не обозначается. В Паскале для обо- 
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значения шестнадцатеричной системы счисления перед чис- 
лом ставится знак доллара - $. В языке Си используется пре- 
фикс Ох. В некоторых версиях Бейсика используется префикс 
«Фл». В языках Ассемблера, - в них присутствуют все исполь- 
зуемые на компьютерах системы счисления: двоичная, вось- 
меричная, десятичная и шестнадцатеричная, - часто в конце 
числа ставится буква - признак системы счисления. В 
(binary) - двоичная, О (octal) – восьмеричная, не ставится или 
D (decimal) - десятичная, H (Бехдеста|) - шестнадцатеричная, 
но системы счисления могут обозначаться и по другому. 

При вводе-выводе и использовании букв при записи неде- 
сятичных чисел лучше использовать не числовые, а строковые 
данные, которые затем в цикле посимвольно, согласно (13.1), 
переводятся в десятичное число. 

В качестве максимальной границы используется функция 
Length (<строка>), а внутри цикла каждый символ (цифра а) 
выбирается оператором выбора САЗЕ. 

Примечания. 

1. Число в заданной системе счисления должно вводиться 

с клавиатуры. 

2. Так как переводятся целые числа, то лучше всего HC- 
пользовать для результата четырехбайтный целочислен- 
ный тип данных Longint, так как под тип [nteger отво- 
дится только 2 байта. 

3. Длина числа должна быть 5-4 цифры (символа), причем 
состоять минимум из двух букв (остальные - десятич- 
ные арабские цифрь). 

4. При вводе недопустимых символов, например х или 
точки, должно выводиться какое-либо сообщение без 
вывода результата. Это легко достигается с помощью 
ветви else оператора CASE. 


Варианты задания приведены в табл. 11. 
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Таблица 11. Вариантъг заданий. 


Перевести число из системы счисления с основанием п в 
десятичную систему счисления. 
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Лабораторная работа № 11. 
Работа с файлами и строками 


Целью работы является приобретение навыков работы с 
файловыми структурами при работе с модулем System (для 
Pascal АВС - РАВСЗу епт). Модуль Dos в данной лабораторной 
работе не рассматривается. А так же изучаются операции ра- 
боты со строками. 

Прежде, чем использовать файлы, им надо поставить в со- 
ответствие файловые переменные процедурой Assign. Напри- 
мер: 


Assign (f, ОУзшдеп/0021 75/пу!!е.дай); 
Assign (f, myfile.datť’); 


Во втором случае файл находится в текущем каталоге. Это 
единственная структура, которая подчиняется непосред- 
ственно операционной системе, всё остальное (кроме коммен- 
тариев) в тексте программы принадлежит правилам языка 
Паскаль. 

Эта процедура должна стоять первой при начале работы с 
файлом. Сама же файловая переменная описывается в разде- 
ле описания переменных строкой вида 


Маг <список файловых переменных>: FILE OF <тип компонент> 


Так как строки являются особенными структурами дан- 
ных, то для их хранения используется специальное описание 
файловых переменных: 


Маг < имя файловой переменной >: text; 
Например: 
Маг File, ОЩЕ: text; 


По большому счету все файлы можно либо создавать, либо 
читать. В первом случае используется процедура открытия 
файла для записи Rewrite, во втором - открытие файла для 
чтения Reset. 

В дальнейшем в первом случае в них можно записывать 
обычной процедурой Write, во втором - читать процедурой 


Работа с файлами и строками 83 


Read. Если же используются текстовые файлы, то так же MOX- 
но использовать процедуры WriteLn и Веааїл. 

Для процедур Write/ WriteLn и Кеаа/ КеааГл консоль яв- 
ляется стандартным устройством ввода-вывода, поэтому име- 
на файлов для клавиатуры и экрана монитора можно не ука- 
зывать. Во всех остальных случаях в строке ввода-вывода на 
первом месте должна стоять файловая переменная. Например: 


WriteLn(OutF, A помню чудное мгновенье’); 


Над символьными массивами разрешены только операции 
сравнения. Над строками разрешено гораздо больше опера- 
ций. Они могут быть оформлены не только в виде знаков, та- 
ких как + (конкатенация), но и в форме процедур или функ- 
ций. 

Например, функция Сору (<строка>, <номер первого сим- 
вола>, <количество символов>) позволяет копировать или вы- 
делять фрагмент строки. 

Функция Роз (<искомая подстрока>, <строка>) позволяет 
произвести поиск определенного фрагмента в некоторой стро- 
ке и определить номер символа, с которого начинается вхож- 
дение подстроки. 

Функция Length (<строка>) позволяет определить не пре- 
дельную, а фактическую длину строки. Результат - целое чис- 
ЛО. 

Процедура Delete (<строка>, <номер первого удаляемого 
символа>, <количество символов>) удаляет в исходной строке 
фрагмент определенной длины. 

Прочие функции (но не процедуры) приведены в Прило- 
жении А. 

Более того, можно получить доступ к любому символу 
строки, указав ее в виде элемента массива с индексом. В опи- 
сании строки можно указывать предельное значение количе- 
ства символов, но можно и не указывать: 


Маг st,at: string; 
St1,st2:string[20]; 
Если длина не задана, TO по умолчанию (автоматически) 
принимается максимально возможная - 255 символов. 


Задание 
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В данной лабораторной работе используются две програм- 
мы: одна для формирования текстового файла с расширением 
txt, другая для работы с ним. 

Сформировать файл с заданной структурой, состоящий из 
8-16 строк, каждая из которых состоит из нескольких слов. 
Для этих целей лучше всего использовать фрагмент стихотво- 
рения. Во второй программе требуется прочитать данные из 
файла, обработать их определенным образом и записать в тот 
же файл. 


Варианты задания приведены в табл. 12. 
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Таблица 12. Варианты заданий 


н 


Вывести в файл количество слов, начинающихся с раз- 
ных букв, упорядоченных по алфавиту. То есть результат 
должен содержать таблицу, в первой графе которой 
название буквы, во второй – количество слов, начинаю- 
щихся с этой буквы. Если слов, начинающихся с данной 
буквы, нет, то строка пропускается. 
Использовать шифрование методом простой переста- 
новки с длинной блока З. Размер текста должен быть 
кратен 3, в противном случае текст дополняется пробе- 
лами. В данном случае местами меняются только край- 
ние буквы, средняя остается на месте. Пример: 

До шифрования: | МАМ |А М [ЫЛА | РА | МУ | 

После шифрования: | МАМ | МА | АЛЪЦАР | УМ | 
Подсчитать количество слов, пробелов и знаков препи- 
нания в файле. Записать результат в файл в виде «коли- 
чество слов= <число>, количество пробелов= <число>, ко- 
личество знаков препинания= <число>». 
Провести анализ вхождения букв начала алфавита А, Б, 
В, Г. То есть определить отношение появления этих букв 
ко всем буквам текста. Результат вывести на экран в ви- 
де таблицы с графами буква - частота появления. 
Использовать шифрование с применением шифра Цеза- 
ря с величиной сдвига 4 по алфавиту в сторону убыва- 
ния. Используется кольцевой сдвиг: буква А меняется на 
b, B - на Э, В - на Ю, Г- на Я. Пробелы и знаки препи- 
нания не изменяются. Пример: 

До шифрования: МАМА МЫЛА РАМУ 

После шифрования: ИБИЬ ИЧЗЬ МЬИП 
Задать размер строки (не менее самой длинной) и вы- 
ровнять все строки по ширине (как это делается в Мога) 
вставкой пробелов. 
Переставить местами строки со сдвигом: первую на ме- 
сто второй, вторую на место третьей и т.д., последнюю 
на место первой. 
Использовать шифрование с применением шифра Цеза- 
ря и величиной сдвига 3 по алфавиту в сторону возрас- 
тания. Используется кольцевой сдвиг: буква Э меняется 
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на А, Ю - на Б, Я - на В. Пробелы и знаки препинания 
не изменяются. Пример: 
До шифрования: МАМА МЫЛА РАМУ 
После шифрования: ПГИГ ПЮОГ УГПЦ 
10. | Поменять слова со сдвигом на 2 слова: первое на место 
третьего, второе на место четвертого и т.д., предпослед- 
нее на место первого, последнее на место второго. 
Продублировать все гласные буквы: везде, где встреча- 
ется буква А записать АА, везде, где Е - ЕЕ и т.д. 


З буквы. 
13. | Использовать шифрование методом циклической пере- 
становки с длинной блока 4. Размер текста должен быть 


кратен 4, в противном случае текст дополняется пробе- 


лами. Текст по блокам сдвигается вправо, последняя 
буква помещается на место первой. Пример: 
До шифрования: | МАМА | МЫЛ |А РА | МУ | 
После шифрования: | АМАМ |^ МЫ |АА P| МУ | 
Удалить из текста все знаки препинания и прочие спе- 


циальные символы, оставив только пробелы. Каждую 
строку заканчивать точкой, если ее там не было. 

т.д., последнее на место первого. 

Продублировать буквы начала алфавита А, Б, В, Г, Д: 
везде, где встречается буква А записать АА, везде, где Б 


Провести анализ вхождения символов-разделителей: 
пробелов, табуляции, перехода на новую строку. То есть 
определить отношение появления этих символов как ко 
всем буквам текста, так и ко всем символам файла. 
Использовать шифрование с применением шифра Цеза- 
ря и величиной сдвига 4 по алфавиту в сторону возрас- 
тания. Используется кольцевой сдвиг: буква Ь меняется 
на А, Э – на Б, FO - на В, Я - на Г и т.д. Пробелы и знаки 
препинания не изменяются. Пример: 
До шифрования: МАМА МЫЛА РАМУ 
После шифрования: РДРД РЯПД ФДРЧ 
19. | Поменять слова со сдвигом на 3 слова: первое на место 

четвертого, второе на место пятого и т.д., последнее на 
место третьего. 

Продублировать буквы начала и конца алфавита А, Б, В, 
Э, Ю, Я: везде, где встречается буква А записать АА, 
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везде, гдеБ-ББитд пл 
Задать размер строки (не менее самой длинной) и вы- 
ровнять все строки по ширине (как это делается в Мога) 
вставкой пробелов. 

23. | Провести анализ вхождения знаков препинания: запя- 
той, точки, точки с запятой, многоточия, восклицатель- 
ного и вопросительного знаков. То есть определить от- 
ношение появления этих символов как ко всем буквам 
текста, так и ко всем символам файла. 

24. | Использовать шифрование с применением шифра Цеза- 
ря с величиной сдвига 3 по алфавиту в сторону убыва- 
ния. Используется кольцевой сдвиг: буква А меняется на 
Э, Б - на Ю, В - на Я. Пробелы и знаки препинания не 
изменяются. Пример: 

До шифрования: МАМА МЫЛА РАМУ 
После шифрования: ИЗИЗ ИШИЗ НЭЙР 

25. | Сделать анализ частоты появления букв в файле, упоря- 
доченных по алфавиту. То есть результат - это таблица 
из 33 строк, в одной графе которой название буквы, в 
другой - количество появлений в файле. 

26. | Подсчитать количество слов, пробелов и знаков препи- 
нания в файле. Результат с сопровождающими надпися- 
ми вывести на экран. Записывать результат в файл не 
надо. 

27. Использовать шифрование методом циклической пе- 
рестановки с длинной блока 3. Размер текста должен 
быть кратен 3, в противном случае текст дополняется 
пробелами. Текст по блокам сдвигается вправо, послед- 
няя буква помещается на место первой. Пример: 

До шифрования: | МАМ |A М|ЫЛА| РА | МУ | 
После шифрования: |АММ | МА | ЛАБЦ РА |Y M| 

28. | Отсортировать все слова по алфавиту, учитывая все 
буквы. Получить файл из строк по количеству слов, уда- 
лив все пробелы и знаки препинания. 

29. | Провести анализ вхождения гласных А, Е, И, О, У, Э, Ю, 
Я. То есть определить отношение появления этих букв ко 
всем буквам текста. 

30 Использовать шифрование методом простой пере- 
становки с длинной блока 4. Размер текста должен быть 
кратен 4, в противном случае текст дополняется пробе- 
лами. В данном случае местами меняются только край- 
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ние буквът, средняя остается на месте. Пример: 


До шифрования: | МАМА | МЫЛ | А РА | МУ | 
После шифрования: | АМАМ |ЛЫМ |AP A| УМ | 
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Лабораторная работа № 12. 
Динамические переменные. Списки 


В языке Паскаль, есть переменные, которые создаются и 
уничтожаются в процессе выполнения программы. Они не 
входят в явные описания программы и, следовательно, к ним 
нельзя обращаться с помощью имен. Память для них выделя- 
ется только динамически в ходе работы программы. 

Доступ к динамическим переменным осуществляется с 
помощью указателей (или ссылок), которые становятся опре- 
деленными после создания динамического объекта. 

Динамические переменные очень широко используется в 
программировании, более того, современные операционные 
системы имеют функции поддержки динамических областей 
памяти. 

Так как динамические переменные отсутствуют в разде- 
лах описаний, до для указания на них используются указате- 
ли. Тип указателя сам по себе не является динамической 
структурой данных, часто его называют ссылочным типом. 
Это обычное четырехбайтное (или больше, в зависимости от 
установленной разрядности и операционной системы) число, 
содержащее адрес, с которого начинается динамическая пе- 
ременная. Адрес в архитектуре процессоров фирмы Intel - два 
целых беззнаковых числа, определяющие номер сегмента па- 
мяти и смещение внутри этого сегмента. Указатели использу- 
ются для установления отношений или связей между динами- 
ческими структурами данных. Эти связи могут быть весьма 
сложными. 

В стандартном языке Паскаль указатели должны ссылать- 
ся на однотипные элементы данных, то есть являются типи- 
зированными. Существует специальное значение указателя 
NIL (пустой указатель), принадлежащее всем типам указате- 
лей. В этом случае указатель не указывает ни на какой эле- 
мент. Это значение применяется для обозначения конца спис- 
ка или ветви дерева (по аналогии в функцией EOF). 

Для того чтобы присвоить переменной ссылочного типа 
определенное значение, необходимо воспользоваться опера- 
цией взятия адреса (указателя), - символа амперсанд «@» и 
переменной базового типа. 

Для реализации косвенного доступа к переменной через 
указатель используется разыменование. То есть, чтобы по 
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указателю получить доступ к переменной, необходимо после 
указателя поставить знак «^». 

Основные действия над динамическими переменными — 
это их создание и уничтожение. Первое реализуется стандарт- 
ной процедурой 


NEW (<указатель>); 


Для освобождения памяти, выделенной под динамическую 
переменную, используется процедура, обратная по действию 
процедуре New: 


DISPOSE (<указатель>); 


Работа с динамическими переменными требует болыпой 
аккуратности, иначе «засорение» памяти ненужными пере- 
менными может привести к быстрому ее переполнению. 

Связный список - базовая динамическая структура дан- 
ных в информатике, состоящая из узлов, каждый из которых 
содержит как собственно данные, так и одну или две ссылки 
(«связки») на следующий и/или предыдущий узел списка. 
Принципиальным преимуществом перед массивом является 
структурная гибкость: порядок элементов связного списка 
может не совпадать с порядком расположения элементов дан- 
ных в памяти компьютера, а порядок обхода списка всегда 
явно задаётся его внутренними связями. 

Маркеры (указатели). Чаще всего указывают на начало 
списка. Обозначаются либо специальным символом, либо вы- 
деляются цветом, либо отмечаются как-то иначе. Часто мар- 
керы не поддаются удалению обычными средствами, 
например, для их удаления вводится специальный элемент 
меню. Обычно маркер является первым элементом списка, и 
при возможности удаления удаляется весь список. 


Типы списков. 


Кольцевой. Следующий элемент для конца списка являет- 
ся начальным элементом (и следующий для первого элемента - 
последний в списке). При обычной организации списков при 
просмотре влево остановка происходит на первом элементе 
(никаких действий не предпринимается). При просмотре 
вправо - на последнем. 
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Двусвязный. Перемещаться по списку можно как от 
начала к концу, так и от конца к началу. Для односвязных 
списков движение возможно только в одну сторону. 


Задание. 


Использовать динамические переменные со структурой 
«Запись, состоящие из информационного поля заданного типа 
и одного или двух указателей. 

Предусмотреть с выбором из меню 6 пунктов работы с ди- 
намическими переменными: 

1. Создание списка (с формированием начальных усло- 


вий) 

2. Запись в файл 

3. Удаление 

4. Вставка 

5. Просмотр вправо 

6. Просмотр влево (для односвязных списков - только од- 


но направление) 
7. Чтение из файла (опционально) 


Варианты заданий приведены в табл. 13. 
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Таблица 13. Вариантъг заданий 


Ко 
Тип даннътх Тип списка 


1 Целый Кольцевой, двусвязный, с удалением маркера из 
специального пункта меню. 


2 Вещественный Двусвязный, с неудаляемым маркером начала 


списка 
ое Кольцевой, движение вправо с удалением марке- 
ра из специального пункта меню. 
Кольцевой, двусвязный, с удалением маркера из 
2 2 
специального пункта меню. 


и Двусвязный, с удалением маркера из специаль- 


ного пункта меню 


Кольцевой, движение влево с удалением маркера 
из специального пункта меню. 


Кольцевой, двусвязный, с удалением маркера из 
7 2 2 


специального пункта меню. 


Двусвязный, с неудаляемым маркером начала 
списка 


Кольцевой, движение вправо с удалением марке- 
ра из специального пункта меню. 


Кольцевой, двусвязный, с удалением маркера из 
специального пункта меню. 


Двусвязный, с удалением маркера из специаль- 
ного пункта меню 


Кольцевой, движение влево с удалением маркера 
из специального пункта меню. 


Кольцевой, двусвязный, с удалением маркера из 
специального пункта меню. 


1 Вещественнътй Двусвязный, с неудаляемьгм маркером начала 
списка 


ре Кобра Кольцевой, движение вправо с удалением марке- 
ра из специального пункта меню. 


№ Тип данных Тип списка 
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Кольцевой, двусвязный, с удалением маркера из 
специального пункта меню. 


Двусвязный, с удалением маркера из специаль- 
ного пункта меню 


Кольцевой, движение влево с удалением маркера 
из специального пункта меню. 


Кольцевой, двусвязный, с удалением маркера из 
специального пункта меню. 


Кольцевой, движение вправо с удалением марке- 
ра из специального пункта меню 


Двусвязный, с неудаляемым маркером начала 
списка 


Двусвязный, с удалением маркера из специаль- 
ного пункта меню 


Кольцевой, движение влево с удалением маркера 
из специального пункта меню. 


Кольцевой, двусвязный, с удалением маркера из 
специального пункта меню. 


Кольцевой, движение вправо, с неудаляемым 
маркером начала списка 


Кольцевой, двусвязный, с неудаляемым марке- 
ром начала списка 


Кольцевой, движение вправо с удалением марке- 
ра из специального пункта меню. 


Кольцевой, двусвязный, с удалением маркера из 
специального пункта меню. 


Двусвязный, с неудаляемым маркером начала 
списка 


Е Двусвязный, с удалением маркера из специаль- 
ного пункта меню 


Вещественный 
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Лабораторная работа № 13. 
Графический режим монитора. 
Построение графиков 


Целью работы является ознакомление с использованием 
функций графического режима работы монитора на примере 
построения графиков. 

Так как Турбо-Паскаль разрабатывался под ОС MS DOS, 
то основным режимом работы монитора был текстовый. С по- 
явлением Windows 95 стал графический режим. Поэтому Typ- 
бо-Паскаль (так же, как и Free Pascal) ориентирован на работу 
в текстовом режиме. Так как модуль Graph в Турбо-Паскале и 
Free Pascal существенно различаются, то рассмотрим только 
модуль для Free Pascal. 

Для перевода в графический режим необходимо выпол- 
нять определенные действия. 

1. Подключить модуль Graph, в котором находятся все проце- 
дуры и функции графического режима монитора. Делается 
это с помощью описания подключаемых модулей: 


Uses Graph 


Это описание следует сразу же за заголовком программы. 
2. Для перехода в графический режим (на месте блока в алго- 
ритме «Очистка экрана») могут использоваться процедуры 
ПетестОгар и InitGraph, например: 


DetectGraph (дпмег,гагтег); 
InitGraph (дпмег,гагтег,”); 


Здесь driver задает номер драйвера видеорежима, razmer - 
размер экрана в пикселях, оба параметра - целые. Последний 
параметр в InitGraph (пустая строка) задает шрифт по умол- 
чанию. Эта пустая строка пишется всегда, так как дополни- 
тельные шрифты с Free Pascal не поставляются. 

3. Затем задаются цвета фона и переднего плана (точек, AH- 
ний, букв и т.д.), по умолчанию они соответственно черный 
и белый. Так как выводятся два графика, то их лучше всего 
обозначать разными цветами. Для установки цвета перед- 
него плана используется процедура SetColor с одним целым 
параметром, который указывает цвет: 

О - черный; 
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1 - синий; 

2 - зеленый; 

3 - светло-синий; 

4 — красный; 

5 – фиолетовый; 

6 – коричневый; 

7 - светло-серый; 

3 — серый; 

9 – светло-синий; 

10 - светло-зеленый; 

11 – голубой; 

12 - светло-коричневый; 
13 – светло-фиолетовый; 
14 — желтый; 

15 – белый. 

4. В модуле Graph много различных процедур и функций, 
предназначенных для рисования геометрических фигур. 
Кроме этого, координаты каждой фигуры могут быть как 
абсолютными, так и относительными. В этой лабораторной 
работе используются только абсолютные координаты и не- 
сколько процедур, например, такие: 


OutTextXY(X0,Y0,Text) 


Здесь ХО - смещение по OCH X с начала координат, 

YO - смещение соответственно по У, обе целые, 

Тех! - выводимый, начиная с указанной точки, текст. 

Начало координат находится в левом верхнем углу, то 
есть увеличение значений по У приводит не к подъему по оси, 
а к спуску. 


Line(X0,Y0,X1,Y1) 


Прямая линия с начальными координатами ХО и YO, и KO- 
нечными ХІ и Y1. 


Риш! Рлхе(хо,У0,соог) 
Вывод точки (пикселя) на экран с указанными координа- 
тами и цветом. 


Для Pascal АВС подключаемый модуль называется 
GraphABC. Кроме этого, пропускаются пункты 2 и З. 
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Вместо процедуры Очи Тех ХУ используется TextOut с теми 
же параметрами. Процедура Line изменений не претерпела, 
процедура PutPixel заменена на бе хе! с теми же параметра- 
ми, кроме цвета. Цвет выбирается из списка предопределен- 
ных имен, описанных в справке по Разса! АВС: «Стандартные 
модули» > «Модуль GraphABC» > «Цветовые константы». Кроме 
этого, цвет линий и текста может быть установлен процедурой 
бетРепСо!ог. 


Требования к оформлению графиков функций. 

Чтобы график не был, с одной стороны, с очень маленьким 
разрешением по высоте, с другой не вылезал за экран, необхо- 
димо функцию отмасштабировать. То есть сначала в про- 
грамме вычисляются минимальное и максимальное значения, 
затем вручную они округляются в болыпую по модулю сторо- 
ну. Так как округление может производиться не обязательно 
по целым числам, то проще это сделать вручную, как описано 
в блок-схеме алгоритма к этой работе (рис.15.1). 

График должен иметь заголовок и шкалы с указанием 
осей, засечек на шкалах. Обозначение осей абсцисс и ординат 
и проставленными по ним значениями. То есть программа 
должна иметь, кроме общего цикла вывода графиков, ещё 2 
цикла: по осям Хиу. 


Варианты заданий приведены в табл.14. 
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1 
Начало 


2 


Определение 
Fmax и Ети 


Вывод 
Етах и Етт 


Ввод 
откорректиро- 
ванных Етах 

и Етіп 


5 


Очистка экрана 


Вывод 
заголовка 


7 
Для строк 
графика от 
первой до 
последней 











8 
Формирова- 
ние и вывод 
строки 
графика 


9 
Конец 


Рис. 31. Общая блок-схема алгоритма вывода графиков 
функции. 
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Таблица 14. Варианты заданий 
No pa НН Начальное Конечное 
ша УНЕЦ значение х | значение х 
| 
А =X - 
! 
arcsine “ и агссо 10“ 
x и ЩЕ И 
3 3 
! 
1 
1 


COSN\X и вх 


u 
IX 


Е 
> 
1 


а 
ESES 
жи 
EDES 
ESES 
` ” и и Ри ШЕИ 
ЕЕ 
aja 
EJES 
EJES 
ESES 


T VX 
ша и 0,3 (2+1) ши (е-1) 


1 
0,05 
2 
20 
1 
1 
0,2 
0,1 
1,05 
0,1 
0,2 
0,5 

‚05 


O 
1 
2 
3 
4 
5 
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Начальное Конечное 
№ вар. Функции 
значение х | значение х 


7 3 


17 


19 


O 


2 


(о /зшх и с созх 








3 2 
3 2 3 2 


26 


2 
28 In tgx и lgctgyx 


9 
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Приложение А. Основные 
стандартные функции 


В приложении А собраны основные функции модулей, 
подключаемых автоматически (для Турбо-Паскаля и Егее Раз- 
са! это модуль System, для Pascal АВС.МЕТ - модуль РАВС5уз- 
tem), то есть используемые по умолчанию. 

Для Free Pascal используется дополнительный модуль 
«Math», который нужно подключать принудительно. Функции, 
входящие в модуль «Math», отмечены «*». 


Таблица 15. Стандартные функции 
MCP Турбо-Паскаль, Free Pascal и Pascal АВС.МЕТ, версия 2.2 


Мате- Нали- 
мати- |Запись на языке чие в 
ческая Паскаль Pascal 
запись АВС 


ле 
ма [вет | вет 
Ско | eers | сл 
вис | есе | een 


Дробная часть числа, результат - ве- 
я есть есть 
щественный 


Старший байт аргумента есть 


нет 
Целая часть числа, результат - веще- 
в: есть есть 
ственный 
Натуральный логарифм есть есть 


есть есть 
есть есть 


есть есть 
есть есть 


есть есть 


есть есть 


Название функции 


Frac(x) есть 
Ні(1) есть 
Int(x) есть 


есть 


есть 


Является ли аргумент нечетным чис- 
лом? 


Округление по правилам арифметики, 


зна | сл 


Pi есть 
есть 


Капдопа есть 


Round(x) есть 


Младший байт аргумента а есть 
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Переставляет местами старший и ; (1) 
S Swap(i) есть есть | есть 
младший байты 
Округление значения с отбрасывани- 
Ру о р Тгопс(х) есть есть есть 
ем дробной части 


Арккосинус arccos х Агссоз(х) | нет есть“ | есть | 


б Атссоѕћ(х) 
Арккосинус гиперболический arcch х нет | есть“ нет 
Arcosh(x) 


Арксинус arcsin x Arcsin(x) есть* | есть 


` Arcsinh(x) 
Арксинус гиперболический ; нет | есть“ нет 
Arsinh(x) 
Арктангенс с аргументом х/у Агстап2(х,у) 
и Arctanh(x) 
Арктангенс гиперболический нет | есть“ нет 
Artanh(x) 
Округление в направлении K положи- : 
pyr 7 Р Ceil(x) HET есть“ | есть 
тельной бесконечности 
Созесап((х) 
Косеканс созес х нет | есть“ нет 
Сѕе(х) 


Со((х) 
Котангенс ctg x нет | есть“ нет 
Cotan(x) 


Преобразование оборотов B радианы е СусІеТоКаа(х) 
Преобразование градусов в грады ШЕЕ DegToGrad(x) aee, 
Преобразование градусов в радианы А5 РееТоКаа(х) асса | есть | 


Округление в направлении к отрица- 
тельной бесконечности 
Преобразование градов в градусы ЕЭ GradToDeg(x) На 
Преобразование градов в радианы ри GradToRad(x) СЕЕ 


Возведение х в целую степень i ШЕИ Intpower(x,1) epe e 


Вычисление экспоненциальной 
Е х*2! Ldexp(x,i) есть* 
функции 
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мамо 
MaxlIntValue(a) 


есть есть 


Максимальное значение в целочис- 
ленном массиве 


есть“ нет 


Максимальное значение в целочис- 
ленном или вещественном массиве 


Минимальное их двух значений ШЕ 
Минимальное значение в целочис- В 
MinlntValue(a) 
2 


Мах Уаше(а) есть* нет 


есть* есть 


нет есть* нет 
ленном массиве 
МшУаше(а) есть* нет 


Минимальное значение в целочис- 
ленном или вещественном массиве 


Secant(x) 
Секанс sec x 
Sec(x) 
Синус гиперболический Sinh(x) 
Тангенс гиперболический Тапб(х) 


Функции для работы со строками и символами 


BinStrG,k) есть 
Конкатенация (объединение) после- Сопса($1, ...) Дава дъна 
довательности строк или + 


Копирование подстроки с количе- 
ством символов 12 из строки 5, начи- Сору($,11, 12) есть есть 
ная с 11 


Power (х1,х2) есть“ | есть 


КадТоСус!е(х) 


есть“ нет 


есть“ есть 


есть“ нет 


есть“ нет 


есть“ нет 


есть“ нет 


Преобразование целого числа г в CHM- 
волы, содержащие К двоичных разря- 
дов 


Символ, соответствующий указанно- 


му значению кода ASCII есть 


есть 


есть 


Преобразование целого значения г в 
Нех5їг(1,К) нет есть 


символы, содержащие К шестнадца- 
Length(s) есть 


теричных разрядов 
Го\егСазе($) 


есть 


Динамическая длина строки 


Преобразует символы в строчные 
буквы 


есть нет 


Преобразование целого значения і в 
символы, содержащие К восьмерич- 
ных разрядов 





OctStr(1,k) есть 
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Поиск подстроки $1 в строке 52, ре- 
AP p р Роз($1,$2) есть есть есть 
зультат — целое (Буе) 

Задает содержимое строки и ее длину Е SetString(s,c,1) 

Преобразование числового значения X 
Str(x,s) есть 

в строковую переменную 5 
StringOfChar 
(с,1) 


есть есть 


Размножение символа с граз с полу- 
чением в результате строки 


Преобразует символы в прописные 


есть 
буквът 


ОрСазе($) есть 


Val(s,x,1) есть 


Функции для работы с памятью, адресами и указателями 


Addr(x) есть 
Assigned(p) есть 


МахАуа! есть 


МешАуап есть 


есть 


Преобразование из строки 5 в число- 
вую переменную х. Где г- признак 
завершения операции 


есть есть 


Адрес заданного объекта, результат - 
указатель 


есть 


Проверка, имеет ли указатель или пе- 
ременная значение nil 


Текущее значение регистра CS 
Текущее значение регистра DS 


есть 


есть 


есть 


Размер наибольшего непрерывного 
свободного блока в динамически рас- 
пределяемой области 


Число свободных блоков в динамиче- 
ски распределяемой области памяти 


Смещение в памяти заданной пере- 


а есть 
меннои 


Преобразует адрес, заданный в виде 


ОКО) есть 
базового сегмента 11 и смещения 12, в Ри( 1 2) есть 
значение типа указатель 


Сегмент для указанной переменной 35 Ѕео(х) есть есть нет 


Текущее значение регистра SP (указа- 
У р р (у SPtr есть есть нет 
теля стека) 


Функции для работы с файлами 


К | | №6 


Определяется текущая позиция в 
р а FilePos(f) есть есть есть 


Определяется текущий размер файла И FileSize(f) 


есть нет 





104 Приложение А 


Текстовый файл с именем f, откры- 
З Ф ЕЧ OpenRead(f) нет нет есть 
тый на чтение в кодировке Windows 


текстовый файл с именем f, открытый 


OpenWrite(f) HET HET есть 
на запись в кодировке Windows 


Определение для файла статуса «ко- 


g SeekEof(f) есть есть есть 
нец файла» 


Определение для файла статуса «ко- 


SeekEoln(f) есть есть есть 
нец строки» 


Прочие функции 


Определяется максимум заданной ве- па 
Р y High) есть есть есть 
личинъг 


Целое значение, представляющее со- 
бой состояние последней выполнен- IOResult есть есть 
ной операции ввода-вывода. 


Определяется минимум заданной ве- 
личинът 


Low(x) есть есть есть? 


Порядковый номер для значения пе- 


речислимого типа Ога(х) есть есть есть 


Число параметров, переданных в ко- 


Š ParamCount есть есть 
мандной строке 


Заданный параметр командной стро- 


за Рагать (1) есть есть есть 


Предшествующее значение аргумен- 


ЕА Ргед(х) есть есть есть 


Число байтов, занимаемых аргумен- 


SizeOf(x) есть есть нет 
том 


Следующее значение агрумента Succ(x) есть есть есть 


Указатель на таблицу методов объек- 
а У ТуреОќ(х) есть есть нет 


Примечания. () В Pascal АВС функция Swap меняет местами 
не байты в одной переменной, а две переменных, поэтому 
имеет 2 параметра. 

2) В Pascal АВС функция Low возвращает 0. 

3) В Pascal АВС функция Ord преобразует символ в код в KO- 
дировке Unicode. 
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Приложение Б. Отличия языка ИСР 
Разса! АВС.МЕТ от Delphi 


Добавлено 
1. Операции += -= для событий .МЕТ и для процедурных пере- 
менных. 
2. Операции += -= *= для целых и += -= *= /- для веществен- 
ных. 


З. Операция += для строк. 

4. Подпрограммы с переменным числом параметров. 

5. Операция new для вызова конструктора (ident := new 
type_name(params);). 

6. Операция new для создания динамического массива. 

7. Операция typeof. 

8. Использование uses для подключения пространств имен 
.МЕТ (реализовано в Delphi Prism). 

9. Вид доступа internal (наряду с public, private, protected). 

10. Инициализация переменных: var а: integer := 1; 

11. Инициализация переменных: уага := 1; 

12. Объявление локальных переменных в блоке. 

13. Объявление параметра цикла в заголовке цикла: for var 1 :- 
1 to 10 до, foreach x: real in а до. 

14. Оператор lock, обеспечивающий синхронизацию потоков. 

15. Методы в записях. 

16. Инициализаторы полей в классах и записях. 

17. Обобщенные классы (гепепсз). 

18. Реализованы типизированные файлы (в отличие от Delphi 
Prism, где они убраны). 

19. Упрощенный синтаксис модулей. 

20. Описание методов внутри интерфейса класса или записи. 

21. Реализация записью интерфейса. 

22. Методы расширения. 

23. Лямбда-выражения. 


Изменено 


1. Только сокращенное вычисление логических выражений. 
2. Другой синтаксис foreach. 

3. Интерфейсы interface в стиле .МЕТ. 

4. Другой синтаксис перегрузки операций. 
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5. Статические методы классов вместо классовых методов. 
Отсутствие типа TClass. 

6. Деструкторы оставлены лишь для совместимости и не вы- 
полняют никаких действий. 

7. Тип object - синоним System.Object. 

8. Тип exception - синоним System.Exception. 

9. Индексация string с 1, директива переключения на индек- 
сацию с 0. 

10. Процедура write выводит любые типы. 

11. Структурная эквивалентность типов для процедурных пе- 
ременных, динамических массивов, типизированных указа- 
телей и множеств (в Delphi Object Pascal - именная зквива- 
лентность типов за исключением открытых массивов). 

12. Множества на базе произвольных типов (set of string). 

13. Запрет использования указателей на управляемую память. 

14. Процедурные переменные (делегаты) вместо procedure of 
object. 

15. С бестиповыми файлами file можно работать с помощью 
процедур read, write. 

16. Массивы массивов отличаются по типу от двумерных MacC- 
сивов (в частности, записи а|1||]] и ајі,ј| неэквивалентны). 

17. Перегрузка выполняется без ключевого слова overload. 

18. Все конструкторы имеют имя Create. 

19. Автоматическое управление памятью с помощью сборщи- 
ка мусора (за исключением указателей на неуправляемую 
память). 


Отсутствует 


1. Ключевые слова и директивы, и связанные с ними возмож- 
ности: 

Packed 

Threadvar 

Inline 

Asm 

Exports 

Library 

Unsafe 

Resourcestring 

. О1зрищейасе 

10. In 

11. Out 

12. Absolute 


а 
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13. 


13. Пупапис 
14. Local 

15. Platform 
16. Requires 
17. Abstract 
18. Export 

19. Message 
20. Resident 
21. Assembler 
22. Safecall 
23. Automated 
24. Каг 

25. Меаг 

26. Stdcall 
27. Сдес! 

28. Published 
29. Stored 

30. Contains 
31. Implements 
32. Магагеѕ 
33. Default 
34. Deprecated 
35. РасКаге 
36. Register 
37. Dispid 

38. Разса! 

39. writeonly. 


. Приведение типов для переменных: Char(b) := Я. 
. Возможность присвоить адрес подпрограммы указателю 


pointer. 


. Записи с вариантами. 
. Строки РСПаг. 
. Возможность использовать операцию @ для процедурных 


переменных. 


. Вариантные типы. 

. Бестиповые параметры (var а; const b). 

. Открытые массивы (не путать с динамическими!). 
10. 
LA; 


Методы, связанные с сообщениями (message). 
Классовые свойства. 

. Вложенные определения классов. 
Константы-поля классов. 


108 


Литература 


1. Сайт «Разса1АВС.МЕТ. Современное программирование на 
языке Pascal», http: ascalabc.net 

2. Цветков A.C. Язък программирования PASCAL. Система 
программирования АВС Pascal. Учебное пособие для школь- 
ников 7-9 классов. - СПб.: Павловск: Школа им. А.М. Горча- 
кова, 2012-2013. - 46 C., ил. 

3. Махно B.B., Михалкович C.C., Пучкин М.В. Основы mpo- 
граммирования графики. Методические указания для пре- 
подавателей факультета математики, механики и компью- 
терных наук, ведущих курсы по основам программирова- 
ния. – Ростов-на-Дону: Федеральное агентство по образова- 
нию, «Южный федеральный университет», 2007. - 49 с. 

4. Сайт «Free Pascal. Open source compiler for Pascal and Object 
Pascal», http:/ /www.freepascal.or 

5. Алексеев E.P., Чеснокова O.B., Кучер T.B. Free Pascal и Laza- 
rus: Учебник по программированию. - M.: ALT Linux; Изда- 


тельский дом ДМК-пресс, 2010. - 440 с.: ил. - (Библиотека 
ALT Linux). 

6. Кегков Ю.Л. Свободное программное обеспечение. FREE 
PASCAL для студентов и школьников. - СПб.: БХВ- 


Петербург, 2011. — 384 с.: ил. 

7. Павловская Т.А. Паскаль. Программирование на языке вы- 
сокого уровня. Учебник для вузов. - СПб.: Питер, 2007. - 
393 с.: ил. 

8. Турбо Паскаль 7.0. Самоучитель. - СПб.: Питер; К.: Изда- 
тельская группа ВНУ, 2002. - 416 c.: ил. 


Полетаев Игорь Алексеевич 
Полетаева Ольга Александровна 


ПРОГРАММИРОВАНИЕ НА ЯЗЫКЕ ВЫСОКОГО УРОВНЯ 
ПАСКАЛЬ 


Методические указания 


по выполнению лабораторных работ для студентов очной формы обуче- 
ния направлений подготовки 
09.03.01 «Информатика и вычислительная техника», 
09.03.02 «Информационные системы и технологии», 
09.03.04 «Программная инженерия», 
13.03.02 «Электроэнергетика и электротехника» 


Технический редактор Полетаев И.А. 
Компьютерная верстка Полетаев И.А. 


Отпечатано с готового оригинал-макета, 
предоставленного авторами 


Подписано в печать Формат 60х90 / 16. 
Гарнитура Bookman. Усл. печ. л. 4,75 
Тираж экз. Заказ № 


Адрес издательства: 
Россия, 180000, Псков, ул. Л.Толстого, 4 
Издательство ПсковГУ 


